如何改变BUTTON控件的颜色 请问 如果改变BUTTON控件的颜色,或者有其它的第三方控件,麻烦告诉一下具体地址。 小弟是个菜鸟,还有很多问题想请教高手,很急,希望能直接联系。我的QQ:15695430 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 在www.baidu.com里面搜一搜,一大堆第三方控件 用bitbtn吧---做一个*.bmp图片----bitbtn加载这张图片 用1stclass4000控件,你要什么颜色都可以,甚至形状。用google搜一搜便可找到 huiwww(十足菜鸟):能不能麻烦给个下载地址 谢谢! var DC:HDC; brush,oldB:HBrush;begin DC:=GetDC(button1.Handle); Brush:=CreateSolidBrush(clGreen); oldB:=selectObject(DC,Brush); rectangle(DC,button1.ClientRect.Left,button1.ClientRect.Top,button1.ClientRect.Right,button1.ClientRect.Right); selectObject(DC,oldB); DeleteObject(Brush);end; raize控件的Buttton不错,当你的鼠标点击时是一种颜色,当你的鼠标点离开时又是另一种颜色 小弟论坛重新开张了,希望大家支持啊!注册有分啊! 关于数据长度的问题 SOS! 关于ReportBuilder的TppDBPipeline和TppReport的问题,不知各位是如何处理的? “一个困扰我多日” 的DELPHI连接到数据库问题????????????? 怎样得到LISTVIEW中某个SUBITEM? 16进制的字符串转换问题,有些难 在client怎样实现更新? 总和不是**分,那我到底给了多少分? CRM是什么东西?有人知道吗? 哪儿可以找到关于socket编程的资料? Adoquery的Filter属性的问题!很奇怪的! SOS:是高手请进
用google搜一搜便可找到
DC:HDC;
brush,oldB:HBrush;
begin
DC:=GetDC(button1.Handle);
Brush:=CreateSolidBrush(clGreen);
oldB:=selectObject(DC,Brush);
rectangle(DC,button1.ClientRect.Left,button1.ClientRect.Top,button1.ClientRect.Right,button1.ClientRect.Right);
selectObject(DC,oldB);
DeleteObject(Brush);
end;
当你的鼠标点击时是一种颜色,当你的鼠标点离开时又是另一种颜色