社区
Delphi
帖子详情
鼠标的右击事件!
ProgramBeginner
2003-10-16 04:42:19
一个button的OnClick是左(单)击鼠标的事件,请问button有没有右击事件?如果我想响应鼠标的右击事件,该如何实现?谢谢,比较急,在线等!
...全文
41
7
打赏
收藏
鼠标的右击事件!
一个button的OnClick是左(单)击鼠标的事件,请问button有没有右击事件?如果我想响应鼠标的右击事件,该如何实现?谢谢,比较急,在线等!
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
7 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
ProgramBeginner
2003-10-16
打赏
举报
回复
收到,请接分!:)
ProgramBeginner
2003-10-16
打赏
举报
回复
收到,请接分!:)
delphi_xizhousheng
2003-10-16
打赏
举报
回复
可以自己写拦截右键消息的句柄
procedure RBDown(var Msg:TWMRBUTTONDOWN);message WM_RBUTTONDOWN
也可以在控件的MouseDown事件中判断Button的值
ProgramBeginner
2003-10-16
打赏
举报
回复
liufuyahong大哥:我是说在一个button上点击鼠标右键才触发,并不是只要点击鼠标右键就触发,您明白吗?请您再指点一二,谢谢!
liufuyahong
2003-10-16
打赏
举报
回复
或者
procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
begin
if Button=mbRight then
ShowMessage('Right')
else if Button=mbLeft then
ShowMessage('left');
end;
liufuyahong
2003-10-16
打赏
举报
回复
声明
procedure LBDwon(var Msg:TWMLBUTTONDOWN);message WM_LBUTTONDOWN;//左键
procedure RBDown(var Msg:TWMRBUTTONDOWN);message WM_RBUTTONDOWN;//右键
实现
procedure LBDwon(var Msg:TWMLBUTTONDOWN);
begin
//做你想做的事
end;
procedure RBDown(var Msg:TWMRBUTTONDOWN);
begin
//做你想做的事
end;
chenzhengqiu
2003-10-16
打赏
举报
回复
鼠标的右击时将产生一个OnContextPopup事件,但该事件不是右键独有的,键盘上的菜单键也将触发该事件。
FLASH actionscript3游戏编程 处理
右击
事件
拦截
鼠标
右击
实现自定义
鼠标
右击
功能比如
右击
寻路移动
FLASH actionscript3游戏编程 处理
右击
事件
拦截
鼠标
右击
实现自定义
鼠标
右击
功能.zip
鼠标
右击
屏蔽JavaScript代码
鼠标
右击
屏蔽JavaScript代码,
鼠标
右击
屏蔽JavaScript代码,
鼠标
右击
屏蔽JavaScript代码
WEB前端中级DOM讲解
课程目标:本课程带领大家学习,网页中的实际功能的开发,如:轮播图片、购物车、
右击
菜单、表单验证等等功能的实现课程简介:第一章:BOM第二章:DOM基础第三章:DOM操作CSS第四章:DOM节点操作第五章:
事件
入门第六章:
事件
对象第七章:
事件
高级第八章:Element对象第九章:DOM尺寸和位置第十章:DOM操作表格第十一章:动态加载脚本和样式第十二章:Text节点操作第十三章:DOM进阶第十四章:作业第十五章:案例 1,轮播图片两种做法 2、选项卡案例 3,
右击
菜单案例 4、购物车案例5、登录注册案例6,动态加载案例7、置顶功能案例8、放大镜案例9,添加删除表格案例
JS
鼠标
右击
弹出菜单效果
JS
鼠标
右击
弹出菜单效果 JS
鼠标
右击
弹出菜单效果 JS
鼠标
右击
弹出菜单效果
QT小项目-天气预报桌面小程序(
鼠标
右击
事件
2)
QT小项目-天气预报桌面小程序(
鼠标
右击
事件
2)
Delphi
5,388
社区成员
262,730
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章