Delphi学习手记——改变鼠标形状
来源:互联网 发布:空包淘宝能查到重量么 编辑:程序博客网 时间:2024/05/03 14:35
procedure TForm1.Label1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); //当鼠标移动到标签Label1上时改变鼠标形状
begin
Label1.Font.Color:=clBlue; //设置Label1的字体颜色为蓝色
Label1.Font.Style:=[fsUnderline]; //设置Label1的字体带下划线
Label1.Cursor:=crHandpoint; //设置Label1鼠标形状为手型
end;
procedure TForm1.Label1MouseLeave(Sender: TObject); //当鼠标离开标签Label1时恢复鼠标形状
begin
Label1.Font.Color:=clWindowText; //恢复Label1的字体颜色
Label1.Font.Style:=[]; //恢复Label1的字体(去掉下划线)
Label1.Cursor:=crDefault; //恢复Label1鼠标形状为默认
end;
- Delphi学习手记——改变鼠标形状
- 改变鼠标光标形状
- javascript 改变鼠标形状
- javascript改变鼠标形状
- mfc改变鼠标形状
- mfc改变鼠标形状
- mfc改变鼠标形状
- 改变鼠标形状
- MFC_改变鼠标形状
- qt改变鼠标形状
- 改变鼠标形状
- Qt--改变鼠标形状
- silverlight 改变鼠标指针形状
- [转]css改变鼠标形状
- css属性:改变鼠标形状
- CStatic 链接 改变鼠标形状。
- Delphi中鼠标的形状
- c++ builder\delphi中如何改变操作数据库时的鼠标指针形状
- 转云计算技术
- CSS网页布局中易犯的10个小错误
- 还甾等待 、
- 特斯拉线圈的制作教程
- 通过反射为实例方法创建开放委托
- Delphi学习手记——改变鼠标形状
- OOCL(东方海外)面试经历
- 职场透视:我们都是猪八戒?
- Web安全工具大汇聚
- 深入理解PHP之OpCode
- uClinux和Linux的异同分析
- 2009年9月刊《程序员》算法题之我见——思索之三
- Delphi学习手记——硬盘分区容量设置计算器(源代码)
- C#能与不能之:操作系统(宇宙、卓越、C#OS)