...如何实现按住热键开启子程序功能 松开热键关闭子程序功能

发布网友 发布时间：2024-10-24 10:18

我来回答

共4个回答

热心网友 时间：2024-11-09 07:47

.版本 2
.支持库 shellEx
.支持库 spec
.支持库 EThread
.程序集 窗口程序集1
.程序集变量 倒数, 整数型
.程序集变量 线程句柄, 整数型
.子程序 __启动窗口_创建完毕
注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, #F6键)
时钟1.时钟周期 ＝ 100
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
调试输出 (参数一)
调试输出 (参数二)
.如果真 (参数二 ＝ 0 且 参数一 ＝ 33001)
倒数 ＝ 10
.如果真结束

.子程序 _时钟1_周期事件
倒数 ＝ 倒数 － 1
.如果 (倒数 ＜ 0)
.如果真 (线程句柄 ＞ 0)
强制结束线程 (线程句柄)
线程句柄 ＝ 0
.如果真结束
.否则
.如果真 (线程句柄 ＝ 0)
启动线程 (&子程序1, , 线程句柄)
.如果真结束
.如果结束

.子程序 子程序1
.判断循环首 (倒数 ≥ 0) ' 如果不需要子程序反复执行,可不用循环.
标题 ＝ 到文本 (取现行时间 ())
延时 (500)
.判断循环尾 ()
线程句柄 ＝ 0

热心网友 时间：2024-11-09 07:51

代码
按下某键时'响应以下代码
启动线程 (&子程序, , 变量)

松开某键时'响应以下代码
关闭线程句柄 (变量)

热心网友 时间：2024-11-09 07:51

代码
按下某键时
启动线程 (&子程序, , 变量)

松开某键时
关闭线程句柄 (变量)

热心网友 时间：2024-11-09 07:50

源码都在这了，使用的是输入设备控件，想比之下，注册热键效果要好