求一个用快捷键控制的大漠多线程框架

1915195

求一个用快捷键控制的大漠多线程框架 :1 : 比如F8启动一个鼠标指向的窗口运行,再次按F8启动另一个鼠标指向的窗口运行
2 : 按F9,停止鼠标指向的窗口运行
3 : 按F10, 停止全部正在运行的窗口

哪个大神,给个框架,谢谢

houtian

  

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

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

窗口_监视热键_注册 (&按键回调)

子程序名	返回值类型	公开	备 注
__启动窗口_将被销毁

窗口_监视热键_卸载 ()

子程序名	返回值类型	公开	备 注
按键回调
参数名	类 型	参考	可空	数组	备 注
参数一	整数型
参数二	整数型
参数三	整数型

变量名	类 型	静态	数组	备 注
局_句柄	整数型
i	整数型
局_线程	逻辑型
局_索引	整数型

如果真 (参数三 ≠ 1)
返回 ()
判断 (参数二 ＝ #F8键 )
局_句柄 ＝ 窗口_取鼠标处窗口句柄 ()
如果真 (局_句柄 ＝ 0)
返回 ()
计次循环首 (取数组成员数 (集_句柄), i)
如果真 (集_句柄 [i] ＝ 局_句柄)
返回 ()

计次循环尾 ()
启动线程 (&子程序1, , 局_线程)
加入成员 (集_线程, 局_线程)
加入成员 (集_句柄, 局_句柄)
判断 (参数二 ＝ #F9键 )
局_句柄 ＝ 窗口_取鼠标处窗口句柄 ()
如果真 (局_句柄 ＝ 0)
返回 ()
局_索引 ＝ 0
计次循环首 (取数组成员数 (集_句柄), i)
如果真 (集_句柄 [i] ＝ 局_句柄)
局_索引 ＝ i
跳出循环 ()

计次循环尾 ()
如果真 (局_索引 ＝ 0)
返回 ()
强制结束线程 (局_线程 [局_索引])
判断 (参数二 ＝ #F10键 )
计次循环首 (取数组成员数 (局_线程), i)
强制结束线程 (局_线程 [i])
计次循环尾 ()

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

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

.版本 2<br /> .支持库 EThread<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_线程, 整数型, , "0"<br /> .程序集变量 集_句柄, 整数型, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 窗口_监视热键_注册 (&按键回调)<br /> <br /> .子程序 __启动窗口_将被销毁<br /> <br /> 窗口_监视热键_卸载 ()<br /> <br /> .子程序 按键回调<br /> .参数 参数一, 整数型<br /> .参数 参数二, 整数型<br /> .参数 参数三, 整数型<br /> .局部变量 局_句柄, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 局_线程, 逻辑型<br /> .局部变量 局_索引, 整数型<br /> <br /> .如果真 (参数三 ≠ 1)<br />     返回 ()<br /> .如果真结束<br /> .判断开始 (参数二 ＝ #F8键)<br />     局_句柄 ＝ 窗口_取鼠标处窗口句柄 ()<br />     .如果真 (局_句柄 ＝ 0)<br />         返回 ()<br />     .如果真结束<br />     .计次循环首 (取数组成员数 (集_句柄), i)<br />         .如果真 (集_句柄 <i> ＝ 局_句柄)<br />             返回 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     启动线程 (&子程序1, , 局_线程)<br />     加入成员 (集_线程, 局_线程)<br />     加入成员 (集_句柄, 局_句柄)<br /> .判断 (参数二 ＝ #F9键)<br />     局_句柄 ＝ 窗口_取鼠标处窗口句柄 ()<br />     .如果真 (局_句柄 ＝ 0)<br />         返回 ()<br />     .如果真结束<br />     局_索引 ＝ 0<br />     .计次循环首 (取数组成员数 (集_句柄), i)<br />         .如果真 (集_句柄 <i> ＝ 局_句柄)<br />             局_索引 ＝ i<br />             跳出循环 ()<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br />     .如果真 (局_索引 ＝ 0)<br />         返回 ()<br />     .如果真结束<br />     强制结束线程 (局_线程 [局_索引])<br /> <br /> .判断 (参数二 ＝ #F10键)<br />     .计次循环首 (取数组成员数 (局_线程), i)<br />         强制结束线程 (局_线程 <i>)<br />     .计次循环尾 ()<br /> .默认<br /> <br /> .判断结束<br /> <br /> <br /> .子程序 子程序1

补充内容 (2024-1-25 11:50):
几个局_线程 需要改成集_线程

微信的木头人

https://bbs.125.la/forum.php?mod ... 14809387&extra=
用这个监视热键就行 我自己用过

补充内容 (2024-1-25 11:26):
按F10, 停止全部正在运行的窗口    加入撤销监视热键（）

houtian

快捷键控制.e (866.54 KB, 下载次数: 6)

2024-1-25 11:27 上传

点击文件名下载附件


补充内容 (2024-1-25 11:27):
其他自己扩展就行

1915195

微信的木头人 发表于 2024-1-25 11:25
https://bbs.125.la/forum.php?mod=viewthread&tid=14809387&extra=
用这个监视热键就行 我自己用过

热键这块,我会弄,我主要是想要多线程的框架.

微信的木头人

1915195 发表于 2024-1-25 11:34
热键这块,我会弄,我主要是想要多线程的框架.

我那会做CF多开的时候就是这样的 每个窗口自由控制阿

1915195

houtian 发表于 2024-1-25 11:27
补充内容 (2024-1-25 11:27):
其他自己扩展就行

您好,您发的这个,我没做任何修改,按F8,调试窗口直接闪退了.是什么原因.

补充内容 (2024-1-25 11:39):
我用的是5.93版本

houtian

1915195 发表于 2024-1-25 11:37
您好,您发的这个,我没做任何修改,按F8,调试窗口直接闪退了.是什么原因.

补充内容 (2024-1-25 11:39):

这只是个例子  子程序里面什么也没写  

sefthil1990

6666666666666666666666

1915195

有更好的答案吗？