照理说button应该有canvas属性的,为什么没有呢? 照理说它就不应该有!看看它的祖先:Tobject->TPersistent->TComponent->TControl->TWincontrol->TButtonControl->TButton 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 再问怎样改变BUTTON的颜色? procedure TForm1.Button1Click(Sender: TObject);var ca: TControlCanvas;begin ca := TControlCanvas.Create; ca.Control := Button1; ca.Brush.Color := clred; ca.FillRect(button1.ClientRect); FreeAndNil(ca);end; delphi7连接MYSQL的问题 关于使用VCL Skin 控件后程序出错(请大家帮忙)急!!!!!!!! 如何从Ifix中提取数据 数据类型转换问题! 如何将同一表中某一年和某一月的数据统计到同一个QUERY中???? 哈哈,勾狗恢复了,爽啊,散分! 帮忙详细解释一下 有急手的问题请教,一定给分,(在线等待) COMBOBOX的宽度不够怎么办? 如何使窗体透明? Winsock问题,不是高手不要进来 如何才能改变按钮颜色?
var
ca: TControlCanvas;
begin
ca := TControlCanvas.Create;
ca.Control := Button1;
ca.Brush.Color := clred;
ca.FillRect(button1.ClientRect);
FreeAndNil(ca);
end;