|
|
导航: |
论坛 -> DELPHI技术
斑竹:liumazi,sephil |
|
作者: |
cindy (cindy) |
★☆☆☆☆ |
-
|
普通会员 |
|
2003/4/17 22:47:30 |
标题: |
如何实现SpeedButton颜色的改变 |
浏览:4396 |
|
加入我的收藏 |
楼主: |
对该控件我想实现以下功能:当鼠标点到SpeedButton上时,变为红色,当鼠标离开该SpeedButton时它又变回原来的颜色(蓝色),谢谢!!
----------------------------------------------
- |
作者: |
|
2003/4/17 22:53:02 |
1楼: |
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin speedbutton1.Font.Color:=clBlue; end;
procedure TForm1.SpeedButton1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin speedbutton1.Font.Color:=clRed; end;
----------------------------------------------
|
作者: |
cindy (cindy) |
★☆☆☆☆ |
-
|
普通会员 |
|
2003/4/17 23:17:49 |
2楼: |
多谢了!我想在请教一个问题:能不能不用代码而用控件实现划线的功能?有没有这样的控件呢?
----------------------------------------------
-
|
作者: |
123 (猪猪) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2003/4/17 23:24:49 |
3楼: |
什么划线?
----------------------------------------------
-
|
作者: |
bbhorse (xinhua2008) |
★☆☆☆☆ |
-
|
盒子活跃会员 |
|
2003/4/18 8:32:49 |
4楼: |
可能是想做成表吧!
----------------------------------------------
愿和所有喜欢DELPHI的人做朋友!
|
|