zoukankan
html css js c++ java
一个简单处理消息的例子sendmessage应用
通过消息处理的方法,点击鼠标的右键,来改变form1的caption.
Code
procedure
WMRButtonDown(
var
msg:Tmsg);message WM_RBUTTONDOWN;
procedure
WMRButtonUp(
var
msg:Tmsg);message WM_RBUTTONUP;
//
implement
procedure
TForm1.WMRButtonDown(
var
msg: Tmsg);
begin
Form1.Caption:
=
'
Button Down
'
;
inherited;
end
;
procedure
TForm1.WMRButtonUp(
var
msg: Tmsg);
begin
Form1.Caption:
=
'
Button Up
'
;
inherited;
end
;
procedure
TForm1.Button1Click(Sender: TObject);
begin
SendMessage(Form1.Handle,WM_RBUTTONDOWN,
0
,
0
);
end
;
点击button1也可以实现右键的点击功能。
查看全文
相关阅读:
实现AB值对换的两种方法
Spring文件上传Demo
CentOS 查看系统 CPU 个数、核心数、线程数
InvocationTargetException异常
在 Excel 中设置图片
JavaScript写入文件到本地
Semaphore初探
MySQL连接服务端的几种方式
超链接导致window.location.href失效的解决办法
在 CentOS7 上安装 swftools
原文地址:https://www.cnblogs.com/samsonleung/p/1235539.html
最新文章
MyEclipse启动和运行速度优化
【转】页面跳转Transfer与Redirect的区别你知道吗?
[备忘]Visio中连接线交叉时跨线小弯的去掉方法
【转 】实战手记:让百万级数据瞬间导入SQL Server
Dictionary 的使用
VS 使用Sql Server 数据库增删改查
C#将字符串转换为整型的三种方法的总结
【原】sql 将某列拼成一个字符串
数据结构之二分法查找、快速排序思想与实现
C#对数组去重
热门文章
git stash 用法总结和注意点
Git push remote rejected {change ### closed}
Git Your branch is ahead of 'origin/master' by X commits解决方法
git checkout .还可以恢复吗
cocoapods的安装和使用
vbox中安装mac系统
乐固加固后windows下实现给apk签名
jenkins 多选参数构建配置
git push 提交某一个commit
git 查看某个文件的修改记录
Copyright © 2011-2022 走看看