社区
Delphi
帖子详情
鼠标的右击事件!
ProgramBeginner
2003-10-16 04:42:19
一个button的OnClick是左(单)击鼠标的事件,请问button有没有右击事件?如果我想响应鼠标的右击事件,该如何实现?谢谢,比较急,在线等!
...全文
44
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,392
社区成员
262,732
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章