为什么可以改变TButton上文字的大小,而不能改变文字的颜色? 请问为什么可以改变TButton上文字的大小,而不能改变文字的颜色?TDateTimePicker也存在同样的问题。而TLabel、TEdit、TComboBox、TBitBtn却可以。他们关键的差别在那里? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button2Click(Sender: TObject);Var EC:Tcanvas;begintryEc:=Tcanvas.Create;Ec.Handle:=Getdc(Button1.Handle);Ec.Font.Color:=Clred;ec.Brush.Style:=bsclear;Ec.TextOut(19,5,Button1.Caption);finallyEc.free;end;end; 感谢你给我的启发,不过你忘了调用ReleaseDC。 买个17寸的本本锻炼身体如何? 图片另存的问题? 两个Form之间的刷新Datagrid的问题 救命!使用tcpclient向tcpserver传送内容,判断内容来控制mediaplay播放或暂停 在一个控件中如何动态创建其它的控件 DELPHI里面时间变量运算的问题,很急!!!!!!! 请教疑难问题 Delphi7有哪些方法读网页?请举出例子。 请问在用ADO控件时连接Lookup字段,为什么提示“发生未知错误”。 谁能告诉我这是什么意思啊....... 急!!在DELPHI中怎么判断输入的字符串是数值型(包括浮点) pbl文件安装出错
Var EC:Tcanvas;
begin
try
Ec:=Tcanvas.Create;
Ec.Handle:=Getdc(Button1.Handle);
Ec.Font.Color:=Clred;
ec.Brush.Style:=bsclear;
Ec.TextOut(19,5,Button1.Caption);
finally
Ec.free;
end;
end;