社区
Delphi
帖子详情
怎樣在窗口中捕捉鼠標消息(mousemove)?
mfchuke
2003-09-14 09:10:18
急!!!
...全文
60
5
打赏
收藏
怎樣在窗口中捕捉鼠標消息(mousemove)?
急!!!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
5 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
FrameSniper
2003-09-14
打赏
举报
回复
休想!
你写的这个消息处理器应该是窗体的一个方法!另外明白自己是否要加Inherited
mfchuke
2003-09-14
打赏
举报
回复
谢谢各位的回复,为什么我写的函数procedure WMMousemove(var msg:TWMMouse);message WM_MOUSEMOVE 没有效果?
lxpbuaa
2003-09-14
打赏
举报
回复
如果不需要捕捉鼠标在窗体的子控件(如TPanel、TButton)移动时,可以使用TForm.OnMouseMove事件。
如果要捕捉窗体和子控件上鼠标移动的消息,必须在窗体和子控件的OnMouseMove中都写上你的处理代码。一般的可以首先在TForm.OnMouseMove写处理代码,然后让所有子控件的OnMouseMove共享TForm.OnMouseMove。
在窗体中,覆盖WndProc方法和使用OnMouseMove、或者定义WM_MOUSEMOVE的消息方法都是没有区别的,都只能处理Form本身而不包括其子控件的鼠标移动消息。
FrameSniper:你以后回复问题最好不要使用那么多“!”,好不好呢?
—————————————————————————————————
宠辱不惊,看庭前花开花落,去留无意;毁誉由人,望天上云卷云舒,聚散任风。
—————————————————————————————————
hkbarton
2003-09-14
打赏
举报
回复
窗口不是有onmousemove可以用吗?在里面自己完趁个就可以了啊
FrameSniper
2003-09-14
打赏
举报
回复
直接在窗口过程中捕捉!
覆盖WndProc方法,然后在中间添加自己的处理代码!
VB编程资源大全(源码 其它3)
shellwait.zip 在程序
中
运行另一个exe程序直到它运行结束(1KB) 666,unloadforms.zip 卸装所有的forms(1KB) 667,startfile.zip 在程序
中
运行另一个exe程序(6KB) 668,killapp.zip 终止另一个程序...
VB编程资源大全(源码 其它1)
shellwait.zip 在程序
中
运行另一个exe程序直到它运行结束(1KB) 666,unloadforms.zip 卸装所有的forms(1KB) 667,startfile.zip 在程序
中
运行另一个exe程序(6KB) 668,killapp.zip 终止另一个程序...
ThreeJS视频教程
初识着色器基础,着色器材质怎么用,怎么使用着色器库) 11-常见渲染以及透明度问题 12-对象拾取以及拖拽(3d世界里面如何拖拽物体,拖拽的原理,
mousemove
mouseon等的事件效果) 13-世界坐标以及组的问题(什么是...
VB编程资源大全(源码 其它2)
shellwait.zip 在程序
中
运行另一个exe程序直到它运行结束(1KB) 666,unloadforms.zip 卸装所有的forms(1KB) 667,startfile.zip 在程序
中
运行另一个exe程序(6KB) 668,killapp.zip 终止另一个程序...
VB编程资源大全(源码 其它4)
shellwait.zip 在程序
中
运行另一个exe程序直到它运行结束(1KB) 666,unloadforms.zip 卸装所有的forms(1KB) 667,startfile.zip 在程序
中
运行另一个exe程序(6KB) 668,killapp.zip 终止另一个程序...
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章