|
本帖最后由 雅婷 于 2021-9-3 01:22 编辑
发个网盘给你吧(截图是9.3号那个压缩包里的)链接:https://pan.baidu.com/s/1GSMWjG6WW8-VMqnZNZe_wA
提取码:0000
在吗? 我把你的按钮判断改成按键判断 如下代码没有任何作用了,按了没反应 你看下哪里出了问题呀?
- .版本 2
- .支持库 spec
- .子程序 键盘钩子回调函数, 整数型, , 回调函数是钩子里最重要的东西
- .参数 参数一
- .参数 按键状态
- .参数 键值
- .局部变量 按键信息, 按键信息
- .局部变量 声音文件_局, 文本型
- .局部变量 局部_单击次数, 整数型
- .局部变量 窗口句柄, 整数型
- .局部变量 时钟id, 整数型
- .局部变量 按键时间, 整数型
- .局部变量 比较按钮, 整数型
- ' 目标按键代码 = 取代码 (编辑框1.内容, ) - 32
- ' 目标按键代码 = 取代码 (“174”, ) - 32
- ' 目标按键代码 = 8
- 取键键码_钩子 = 取字节集数据 (指针到字节集 (键值, 1), #整数型, ) ' 把指针转换成键值,键值取出来了想怎么玩怎么玩
- 全局_按键状态 = 按键状态
- 定时器设定值 = 60
- ' 调试输出 (取键键码_钩子)
- 集_时间2 = 0
- 是否超时 = “未超时”
- 停止长按 = 假
- 是否双击 = 假
- 窗口句柄 = 0
- .如果真 (取键键码_钩子 = #WIN键) ' 退格键 键码91
- 调试输出 (“微标键按下,键码:”, #WIN键)
- .判断开始 (微标键切换模式.选中 = 真)
- .判断开始 (按键状态 = #按键按下) ' 按下
- 调试输出 (“微标键按下,键码:”, #WIN键)
- ' 多次点击.连点器 (取键键值)
- 销毁时钟_ (窗口句柄, #按键按下) ' // #ID_TIME_MOUSE_CLICKDOWN = 2
- 销毁时钟_ (窗口句柄, #按键抬起) ' //#ID_TIME_MOUSE_CLICKUP = 3
- 时钟id = 设置时钟 (0, 按键状态, 260, 0)
- .判断 (按键状态 = #按键抬起) ' 按下
- 调试输出 (“微标键抬起,键码:”, #WIN键)
- ' 多次点击.连点器 (取键键值)
- 销毁时钟_ (窗口句柄, #按键按下) ' // #ID_TIME_MOUSE_CLICKDOWN = 2
- 销毁时钟_ (窗口句柄, #按键抬起) ' //#ID_TIME_MOUSE_CLICKUP = 3
- 时钟id = 设置时钟 (窗口句柄, 按键状态, 260, 0)
- 按键时间 = 按键时间 + 1
- .判断 (按键状态 ≠ #按键抬起) ' 按下 #系统定时器
- 销毁时钟_ (窗口句柄, #按键抬起) ' 原wParam
- .判断开始 (#按键抬起 = #按键按下) ' 判断 (wParam = #按键按下)
- 获取按键点击 (按键时间)
- 按键时间 = -1
- .判断 (#按键抬起 = #按键抬起) ' 判断 (wParam = #按键按下)
- .如果真 (按键时间 > 0)
- 获取按键点击 (按键时间)
- .如果真结束
- 按键时间 = 0
- .默认
- .判断结束
- 返回 (呼叫窗口函数地址 (比较按钮, 窗口句柄, 按键状态, #按键抬起, #按键按下))
- .默认
- .判断结束
- .默认
- .判断结束
- .如果真结束
- <blockquote>
复制代码
|
|