▼ Mr.XRAYさん
> SetFont(Font1, Font2, Font3, ...)
>
> とすると,日本はFont1で,東京都はFont2で,中国はFont3の設定で表示,
> または印刷されるとか?
こんなのだと思っていました。
procedure Textprint(x, y , p : integer; s : string);
begin
with plprev1.Canvas do begin
Font.Size := p;
Textout(x, y , s)
end;
end;
を作っておいて
Textprint(x座標,y座標,フォントサイズ,文字列);
外してたらごめんなさい。
|