按钮问题

hahaha001

飞机按钮正常点击一次，2键他会循环10秒点击一次，，，问题是飞机按钮点击两次或者3次，那么2键循环点击就不是10秒点击了，他会5秒或者6秒他就点击一次了，
我想修改按钮点击两次或者3次，2键他还是会固定10秒点击一次，不知道怎么修改那我师傅帮忙下

houtian

hahaha001 发表于 2024-3-27 21:57
加了一个线程ID2，，可以了，，谢谢。。。就是还有一个问题。。你这个怎么控制延迟10秒的，，我一打开他 ...

点击后不是要立即按一下2, 然后等10秒再按一次,  如果不是要立即按, 就把把按钮_飞机_被点击事件里如果真改成如果, 按钮点击=真 放到线程ID != 0 里

一线之隔

那是另一条线程

houtian

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
线程ID	整数型
按钮点击	逻辑型

子程序名	返回值类型	公开	备 注
_按钮_飞机_被单击

如果真 (线程ID ＝ 0)
启动线程 (&子程序103, , 线程ID)
按钮点击 ＝ 真

子程序名	返回值类型	公开	备 注
子程序103

变量名	类 型	静态	数组	备 注
飞机	整数型

飞机 ＝ 1
判断循环首 (飞机 ＝ 1)
计次循环首 (50, )
如果真 (按钮点击)
跳出循环 ()
超级延迟 (200)
计次循环尾 ()
按钮点击 ＝ 假
大漠2.键盘_按键 (98)
判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 线程ID, 整数型<br /> .程序集变量 按钮点击, 逻辑型<br /> <br /> .子程序 _按钮_飞机_被单击<br /> <br /> .如果真 (线程ID ＝ 0)<br />     启动线程 (&子程序103, , 线程ID)<br /> .如果真结束<br /> 按钮点击 ＝ 真<br /> <br /> .子程序 子程序103<br /> .局部变量 飞机, 整数型<br /> <br /> 飞机 ＝ 1<br /> .判断循环首 (飞机 ＝ 1)<br />     .计次循环首 (50, )<br />         .如果真 (按钮点击)<br />             跳出循环 ()<br />         .如果真结束<br />         超级延迟 (200)<br />     .计次循环尾 ()<br />     按钮点击 ＝ 假<br />     大漠2.键盘_按键(98)<br /> .判断循环尾 ()

这样试试

补充内容 (2024-3-27 19:09):
你的代码每点击一次按钮就会启动一次线程,  这样是不行的

hahaha001

houtian 发表于 2024-3-27 19:08
[e=1].版本 2
.支持库 EThread

按照你这个不知道为什么点击飞机按钮2键没有反应了

houtian

hahaha001 发表于 2024-3-27 19:45
按照你这个不知道为什么点击飞机按钮2键没有反应了

98是数字键盘2, 字母上方的2键盘码是50

hahaha001

houtian 发表于 2024-3-27 19:57
98是数字键盘2, 字母上方的2键盘码是50

这个我知道，，就是点击按钮飞机，，，小键盘2按键不点击了

houtian

hahaha001 发表于 2024-3-27 20:10
这个我知道，，就是点击按钮飞机，，，小键盘2按键不点击了

线程ID 是不是别的线程也用的这个变量

liwei321gogo

按钮点击后禁止了不行吗？

走一回

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
次数	整数型

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
i	整数型
真假	逻辑型

次数 ＝ 次数 ＋ 10
真假 ＝ 真
判断循环首 (次数 ≠ 0)
次数 ＝ 次数 － 1
延迟 (100)
调试输出 (次数)
判断循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 次数, 整数型<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 真假, 逻辑型<br /> <br /> 次数 ＝ 次数 ＋ 10<br /> 真假 ＝ 真<br /> .判断循环首 (次数 ≠ 0)<br />     次数 ＝ 次数 － 1<br />     延迟 (100)<br />     调试输出 (次数)<br /> .判断循环尾 ()