调用下面的程序为什么总是显示宋体？
procedure tytleE(y,c:integer;s:string);
var x,w,ws:int;
begin
form1.canvas.brush.Style:=bsclear;
form1.canvas.font.size:=20;
form1.canvas.font.name:='Arial';
form1.canvas.font.style:=[fsbold];
ws:=form1.Canvas.TextWidth(s);
x:=(form1.width-ws) div 2;
form1.canvas.font.color:=c;
form1.canvas.TextOut(x,y,s);
end;

我是希望'Arial'体。

[解决办法]
问一下：你是否显示英文字母试过？
[解决办法]
是这样啊，有点神秘了，怪不得我找不出毛病来。不妨换各种不同参数试试。


[解决办法]
parentfont之类的属性调整下看看。
[解决办法]
对字母有效!