易语言火山怎样让SetTimer时钟周期记录一次循环超时等待无...

蓝雅婷

LLJ 发表于 2021-9-2 17:50
下载还要2 JB，懒得下载
这已经是思路了，你只不过换个写法就不会了吗？比如写成热键

我没有设置下载要扣2精币的选项， 发个网盘给你吧链接：https://pan.baidu.com/s/1GSMWjG6WW8-VMqnZNZe_wA
提取码：0000

蓝雅婷

LLJ 发表于 2021-9-2 18:03
看这截图的代码，就觉得你还需要再练。
另外SetTimer的精度是不准确的，更不要用这个来累加计时，要计时 ...

谢谢，dll里面的时钟不准确吗？

蓝雅婷

LLJ 发表于 2021-9-2 17:30
易语言的 时钟1.时钟周期 ＝ 0 其实就是销毁，不是建立

我用的是dll里面的时钟，因为要做成通用的类模块，里面就有要配合销毁时钟一起用的命令，我只不过是把dll的名称改为中文了而已，不想用自带时钟，写一个周期就得画一个控件，已经用五个了，

LLJ

蓝雅婷 发表于 2021-9-2 10:42
感觉还可以，但是好像还有点瑕疵，比如用时钟单击的识别率可能会有点慢，但是我发现你这个好像只对回车键 ...

单击识别慢没有办法，因为你不希望单击和双击可以同时触发，就必须等待双击超时了才触发单击，你可以降低双击超时时间，从而加快单击触发时间

LLJ

蓝雅婷 发表于 2021-9-2 16:02
能帮我再看一下吗？我把你的代码加进去后只有长按的效果，不知道怎么回事
...

看这截图的代码，就觉得你还需要再练。
另外SetTimer的精度是不准确的，更不要用这个来累加计时，要计时也应该用：取启动时间 ()，要获得间隔则：取启动时间 ()－上次时间

LLJ

蓝雅婷 发表于 2021-9-2 16:02
能帮我再看一下吗？我把你的代码加进去后只有长按的效果，不知道怎么回事
...

下载还要2 JB，懒得下载
这已经是思路了，你只不过换个写法就不会了吗？比如写成热键

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

时钟1.时钟周期 ＝ 1  ' 开始监视热键

子程序名	返回值类型	公开	备 注
_时钟1_周期事件

变量名	类 型	静态	数组	备 注
回车键状态	短整数型
按下	逻辑型
长按时间	整数型
双击	逻辑型
双击时间	整数型

回车键状态 ＝ GetAsyncKeyState ( #回车键 )
如果 (回车键状态 ＝ -32767)  ' 输入
如果 (按下 ＝ 假)
按下 ＝ 真
长按时间 ＝ 取启动时间 ()
如果 (双击 ＝ 假)
双击 ＝ 真
双击时间 ＝ 取启动时间 ()
如果真 (取启动时间 () － 双击时间 ＜ 300)
双击 ＝ 假
输出调试文本 (“双击”)
双击时间 ＝ 取启动时间 ()

如果真 (双击)

如果真 (取启动时间 () － 长按时间 ＞ 1000)
长按时间 ＝ 取启动时间 ()
双击 ＝ 假  ' 防止放开后触发单击事件
输出调试文本 (“长按”)


如果 (回车键状态 ＝ 0)  ' 放开
按下 ＝ 假
如果真 (双击)
如果真 (取启动时间 () － 双击时间 ＞ 300)  ' 如果双击超时，那就是单击
双击 ＝ 假
输出调试文本 (“单击”)

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 时钟1.时钟周期 ＝ 1  ' 开始监视热键<br /> <br /> .子程序 _时钟1_周期事件<br /> .局部变量 回车键状态, 短整数型<br /> .局部变量 按下, 逻辑型, 静态<br /> .局部变量 长按时间, 整数型, 静态<br /> .局部变量 双击, 逻辑型, 静态<br /> .局部变量 双击时间, 整数型, 静态<br /> <br /> 回车键状态 ＝ GetAsyncKeyState (#回车键)<br /> .如果 (回车键状态 ＝ -32767)  ' 输入<br />     .如果 (按下 ＝ 假)<br />         按下 ＝ 真<br />         长按时间 ＝ 取启动时间 ()<br />         .如果 (双击 ＝ 假)<br />             双击 ＝ 真<br />             双击时间 ＝ 取启动时间 ()<br />         .否则<br />             .如果真 (取启动时间 () － 双击时间 ＜ 300)<br />                 双击 ＝ 假<br />                 输出调试文本 (“双击”)<br />             .如果真结束<br />             双击时间 ＝ 取启动时间 ()<br />         .如果结束<br /> <br />         .如果真 (双击)<br /> <br />         .如果真结束<br /> <br />     .否则<br />         .如果真 (取启动时间 () － 长按时间 ＞ 1000)<br />             长按时间 ＝ 取启动时间 ()<br />             双击 ＝ 假  ' 防止放开后触发单击事件<br />             输出调试文本 (“长按”)<br /> <br />         .如果真结束<br /> <br />     .如果结束<br /> <br /> .否则<br />     .如果 (回车键状态 ＝ 0)  ' 放开<br />         按下 ＝ 假<br />         .如果真 (双击)<br />             .如果真 (取启动时间 () － 双击时间 ＞ 300)  ' 如果双击超时，那就是单击<br />                 双击 ＝ 假<br />                 输出调试文本 (“单击”)<br />             .如果真结束<br /> <br />         .如果真结束<br /> <br />     .否则<br /> <br />     .如果结束<br /> <br /> .如果结束

  

DLL命令名	返回值类型	公开	备 注
GetAsyncKeyState	整数型
DLL库文件名:
user32.dll
在DLL库中对应命令名:
GetAsyncKeyState
参数名	类 型	传址	数组	备 注
键值	整数型

.版本 2<br /> <br /> .DLL命令 GetAsyncKeyState, 整数型, "user32.dll", "GetAsyncKeyState", 公开<br />     .参数 键值, 整数型

LLJ

蓝雅婷 发表于 2021-9-2 16:02
能帮我再看一下吗？我把你的代码加进去后只有长按的效果，不知道怎么回事
...

易语言的 时钟1.时钟周期 ＝ 0 其实就是销毁，不是建立

蓝雅婷

LLJ 发表于 2021-9-2 02:27
要避免单击和双击冲突就要用到定时器了
[e=0].版本 2

能帮我再看一下吗？我把你的代码加进去后只有长按的效果，不知道怎么回事

AnyPopup

加个变量记录上次按下时间与键代码

蓝雅婷

LLJ 发表于 2021-9-2 02:27
要避免单击和双击冲突就要用到定时器了
[e=0].版本 2

感觉还可以，但是好像还有点瑕疵，比如用时钟单击的识别率可能会有点慢，但是我发现你这个好像只对回车键正常使用，换别的按键就会出现第一次能识别到单击，第二次以后就一直识别成长按操作了，但实际上我只是单击了一下并没有按住按键，还有个问题 这个好像有点太散了，假如有10个按键就得复制10个代码，不能集成在一个模块做成方法类，不方便调用。 第一次你提供的那个带有 “上次键代码”这个变量的就可以做成通用方法类