线程池问题

你送的花开了

  

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

变量名	类 型	静态	数组	备 注
Proxy_API	文本型

置错误提示管理 (&错误提示)
私有_设置许可.进入 ()
全局_设置参数.协议选择 ＝ 0
全局_设置参数.执行线程 ＝ 10
全局_设置参数.异常重试 ＝ 3
Proxy_API ＝ 读配置项 (取运行目录 () ＋ “/config.ini”, “配置”, “Proxy_API”, )
私有_设置许可.退出 ()
如果真 (Proxy_API ＝ “”)
信息框 (“未配置代理api 仅支持sk5”, #错误图标 ＋ 4096, “”, )
结束 ()

如果 (私有_鱼刺线程.创建 (全局_设置参数.执行线程, 全局_设置参数.执行线程, , , , 1048576, ))
私有_提取代理.初始代理 (Proxy_API)
_关闭对象 (_线程创建 (0, 0, &鱼刺线程, 0, 0, 0))
信息框 (“创建线程失败!”, #错误图标 ＋ 4096, “”, )
结束 ()

子程序名	返回值类型	公开	备 注
鱼刺线程

变量名	类 型	静态	数组	备 注
获取数量	整数型
局_获取数据失败次数	整数型
局_空闲线程数	整数型
程序执行	逻辑型

程序执行 ＝ 真
判断循环首 (程序执行)
如果真 (私有_鱼刺队列.取数量 () ＝ 0)
判断循环首 (真)
私有_线程许可.进入 ()
获取数量 ＝ 子程序_获取 ()
私有_线程许可.退出 ()
如果 (获取数量 ＝ -1)
私有_线程许可.进入 ()
局_获取数据失败次数 ＝ 局_获取数据失败次数 ＋ 1
私有_线程许可.退出 ()
如果真 (局_获取数据失败次数 ≥ 6)
程序_重启 (, )



私有_线程许可.进入 ()
局_获取数据失败次数 ＝ 0
私有_线程许可.退出 ()

如果真 (获取数量 ＞ 0)
跳出循环 ()
_延迟 (2000)
判断循环尾 ()
局_空闲线程数 ＝ 私有_鱼刺线程.取_空闲线程数 ()
计次循环首 (局_空闲线程数, )
如果真 (私有_鱼刺队列.取数量 () ≤ 0 或 程序执行 ＝ 假)
跳出循环 ()
私有_线程许可.进入 ()
私有_鱼刺线程.投递任务 (&投递任务, , )
私有_线程许可.退出 ()
' _延迟 (5)
计次循环尾 ()
判断循环尾 ()

.版本 2<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 Proxy_API, 文本型<br /> <br /> 置错误提示管理 (&错误提示)<br /> 私有_设置许可.进入 ()<br /> 全局_设置参数.协议选择 ＝ 0<br /> 全局_设置参数.执行线程 ＝ 10<br /> 全局_设置参数.异常重试 ＝ 3<br /> Proxy_API ＝ 读配置项 (取运行目录 () ＋ “/config.ini”, “配置”, “Proxy_API”, )<br /> 私有_设置许可.退出 ()<br /> .如果真 (Proxy_API ＝ “”)<br />     信息框 (“未配置代理api 仅支持sk5”, #错误图标 ＋ 4096, “”, )<br />     结束 ()<br /> .如果真结束<br /> <br /> .如果 (私有_鱼刺线程.创建 (全局_设置参数.执行线程, 全局_设置参数.执行线程, , , , 1048576, ))<br />     私有_提取代理.初始代理 (Proxy_API)<br />     _关闭对象 (_线程创建 (0, 0, &鱼刺线程, 0, 0, 0))<br /> .否则<br />     信息框 (“创建线程失败!”, #错误图标 ＋ 4096, “”, )<br />     结束 ()<br /> .如果结束<br /> <br /> <br /> .子程序 鱼刺线程<br /> .局部变量 获取数量, 整数型<br /> .局部变量 局_获取数据失败次数, 整数型<br /> .局部变量 局_空闲线程数, 整数型<br /> .局部变量 程序执行, 逻辑型<br /> <br /> 程序执行 ＝ 真<br /> .判断循环首 (程序执行)<br />     .如果真 (私有_鱼刺队列.取数量 () ＝ 0)<br />         .判断循环首 (真)<br />             私有_线程许可.进入 ()<br />             获取数量 ＝ 子程序_获取 ()<br />             私有_线程许可.退出 ()<br />             .如果 (获取数量 ＝ -1)<br />                 私有_线程许可.进入 ()<br />                 局_获取数据失败次数 ＝ 局_获取数据失败次数 ＋ 1<br />                 私有_线程许可.退出 ()<br />                 .如果真 (局_获取数据失败次数 ≥ 6)<br />                     程序_重启 (, )<br />                 .如果真结束<br /> <br />             .否则<br /> <br />                 私有_线程许可.进入 ()<br />                 局_获取数据失败次数 ＝ 0<br />                 私有_线程许可.退出 ()<br />             .如果结束<br /> <br />             .如果真 (获取数量 ＞ 0)<br />                 跳出循环 ()<br />             .如果真结束<br />             _延迟 (2000)<br />         .判断循环尾 ()<br />     .如果真结束<br />     局_空闲线程数 ＝ 私有_鱼刺线程.取_空闲线程数 ()<br />     .计次循环首 (局_空闲线程数, )<br />         .如果真 (私有_鱼刺队列.取数量 () ≤ 0 或 程序执行 ＝ 假)<br />             跳出循环 ()<br />         .如果真结束<br />         私有_线程许可.进入 ()<br />         私有_鱼刺线程.投递任务 (&投递任务, , )<br />         私有_线程许可.退出 ()<br />         ' _延迟 (5)<br />     .计次循环尾 ()<br /> .判断循环尾 ()

投递任务后  在处理的时候全局变量 数组操作  文本分割 之类都加了鱼刺的临界许可  但是调试还是会出现超过10-20线程就崩溃的问题   甚至在静态编译后连点击打开都没反应   投递任务用于操作tcp协议   tcp协议用的网络客户端进行连接与发送   求解



补充内容 (2025-5-18 00:03):
审核太慢了  换方法解决了

yuzhong

1111111111111111111111111111111