|
发表于 2012-1-5 13:51:28
|
显示全部楼层
广东省中山市
[e].程序集 窗口程序集1
.程序集变量 热键标识1, 整数型
.程序集变量 热键标识2, 整数型
.程序集变量 热键标识3, 整数型
.子程序 __启动窗口_创建完毕
热键标识1 = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #X键) ' 注册这个热键,开始检测有没有按下X键,注册热键中的参数<3>可以为:0-无功能键;1-CTRL键状态;2-SHIFT键状态;4-ALT键状态或各键状态值之和
热键标识2 = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F1键) ' 按下这个热键就可以开始按键
热键标识3 = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F2键) ' 按下这个热键就可以停止按键
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.局部变量 计次, 整数型
.如果真 (参数一 = 热键标识1) ' 判断是否有按下X键
.计次循环首 (30, 计次) ' 按X键30次,这里觉得按1下X键等于按几下
处理事件 ()
模拟按键 (#X键, , )
.计次循环尾 ()
.如果真结束
.如果真 (参数一 = 热键标识2) ' 判断是否有按下F1键
_开始_被单击 ()
.如果真结束
.如果真 (参数一 = 热键标识3) ' 判断是否有按下F2键
_停止_被单击 ()
.如果真结束
.子程序 _开始_被单击
热键标识1 = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #X键) ' 注册这个热键,开始检测有没有按下X键
.子程序 _停止_被单击
撤销热键 (_启动窗口.取窗口句柄 (), 热键标识1) ' 取消热键,停止检测有没有按下X键[/e] |
|