|
- .版本 2
- .子程序 键盘钩子回调函数, 整数型, , 回调函数是钩子里最重要的东西
- .参数 参数一
- .参数 按键状态
- .参数 键值
- .局部变量 按键信息, 按键信息
- .版本 2
- .支持库 spec
- .子程序 微标键反馈事件
- .参数 窗口句柄, 整数型
- .参数 wmsg, 整数型
- .参数 时钟ID, 整数型
- .参数 dw, 整数型
- ' 限时器 = 20
- ' 集_计时器 = 0
- 销毁时钟_ (窗口句柄, 时钟ID)
- .判断开始 (时钟ID = 单键.驱动组合键 (#微标键, #E键, , 0))
- 调试输出 (“api模式 识别 长按”)
- 集_按键次数累加 = -1
- .判断 (时钟ID = 单键.驱动组合键 (#微标键, #E键, 2, 2))
- .如果真 (集_按键次数累加 > 0)
- 调试输出 (集_按键次数累加, “击”)
- .如果真结束
- 集_按键次数累加 = 0
- .默认
- .局部变量 声音文件_局, 文本型
- .局部变量 局部_单击次数, 整数型
- ' 目标按键代码 = 取代码 (编辑框1.内容, ) - 32
- ' 目标按键代码 = 取代码 (“174”, ) - 32
- ' 目标按键代码 = 8
- 取键键值 = 取字节集数据 (指针到字节集 (键值, 1), #整数型, ) ' 把指针转换成键值,键值取出来了想怎么玩怎么玩
- 全局_按键状态 = 按键状态
- 定时器设定值 = 60
- 集_时间2 = 0
- 是否超时 = “未超时”
- 停止长按 = 假
- 是否双击 = 假
- .判断开始 (取键键值 = #WIN键) ' 退格键
- .判断开始 (按键状态 = #按键按下) ' 按下
- 销毁时钟_ (0, 单键.驱动组合键 (#微标键, #E键, , 0))
- 销毁时钟_ (0, 单键.驱动组合键 (#微标键, #E键, 2, 2))
- 设置时钟_ (0, 单键.驱动组合键 (#微标键, #E键, , 0), 200, &微标键反馈事件)
- .判断 (按键状态 = #按键抬起)
- 销毁时钟_ (0, 单键.驱动组合键 (#微标键, #E键, , 0))
- 销毁时钟_ (0, 单键.驱动组合键 (#微标键, #E键, 2, 2))
- 设置时钟_ (0, 单键.驱动组合键 (#微标键, #E键, , 0), 200, &微标键反馈事件)
- 集_按键次数累加 = 集_按键次数累加 + 1
- ' 调试输出 (“单击次数”, 集_按键次数累加)
- .默认
- .判断结束
- ' 返回 (呼叫窗口函数 (前一窗口句柄, 取窗口句柄 (), wmsg, wparm, lparam)),这个不知道填写什么,就没填写
- .默认
复制代码
好家伙,你这变成按键连点器了!!真是猝不及防啊,根本不是想要的效果,按照你这个方式写的,按一下微标键**出五个资源管理器窗口,关都关不赢啊,
我要的是点两下 微标键 才打开资源管理器,同时屏蔽原始输出的开始按钮,点一下还是原来的开始菜单功能不变,这两次都和第一次的不能冲突。其实要的就是鼠标一样的双击效果 |
|