社区
Delphi
帖子详情
有没有办法在shape控件上实现,在鼠标移上去时颜色变掉,移开时恢复为原来的颜色。
dowms22
2003-09-12 05:17:15
有没有办法在shape控件上实现,在鼠标移上去时颜色变掉,移开时恢复为原来的颜色。用代码什么实现啊?
...全文
34
2
打赏
收藏
有没有办法在shape控件上实现,在鼠标移上去时颜色变掉,移开时恢复为原来的颜色。
有没有办法在shape控件上实现,在鼠标移上去时颜色变掉,移开时恢复为原来的颜色。用代码什么实现啊?
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
2 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
AustinLei
2003-09-12
打赏
举报
回复
procedure TForm1.Shape1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Shape1.Brush.Color:=clSilver;
end;
procedure TForm1.FormMouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
begin
Shape1.Brush.Color:=clWhite;
end;
sixgj
2003-09-12
打赏
举报
回复
可以吧。设置鼠标的onmove事件看一下。
Excel VBA实用技巧大全 附书源码
03032设定工作表被保护
时
是否启用数据透视表
控件
和操作 03033设定工作表被保护
时
是否可以选定单元格 03034新建工作表并重命名 03035复制工作表 03036
移
动工作表 03037删除工作表 03038保护工作表 03039撤销保护工作...
C# for CSDN 乱七八糟的看不懂
字符串是 Unicode 字符序列 8 位有符号整型 16 位有符号整型 32 位有符号整型 64 位有符号整型 示例 object o = null; 范围 string sbyte short int long string s = "hello"; sbyte val = 12; short val = 12; int...
Java学习指南19 JavaFX入门
本篇介绍JavaFX的基本技术,至少包括以下方法:* 基本
控件
的使用 Label Button ImageView等* 基本布局的使用 BorderPane, HBox, VBox等* 常用形状的使用
Shape
* 事件处理的基本方法* ListView, ...
python pyqt5学习笔记 2020.9.29(改变
鼠标
样式,获取
鼠标
当前位置坐标,
鼠标
控制qlabel图片
移
动和图片的缩放)
#
鼠标
移
入label1中变成普通光标 self.ui.label1.setCursor(QtCore .Qt.PointingHandCursor) #手型光标
鼠标
相关事件 表格来自:https://blog.csdn.net/qq_38783863/article/details/103951314
鼠标
滚轮事件: def ...
VB 自制用户自定义
控件
选择“添加工程”选中标准EXE,这
时
你就可以像调用其它
控件
一样在左边的工具栏里选择刚才新建的OCX
控件
图标放在标准的EXE文档中看一看有什么效果!(什么也没有!) 自然因为刚才的OCX文档是空的嘛(废话太多,数个痰盂向...
Delphi
5,379
社区成员
262,722
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章