线程启动失败

shengchun

.版本 2
.支持库 spec

.程序集 窗口程序集_启动窗口
.程序集变量 主线程句柄, 整数型

.子程序 __启动窗口_创建完毕

.如果 (判断大漠组件是否被注册 () ＝ 假)
    大漠注册 ()

.否则

.如果结束


.子程序 初始化
.参数 i, 整数型

初始化COM库 ()
绑定游戏 (i)
主程序 (i)

.子程序 绑定游戏
.参数 i, 整数型
.局部变量 句柄, 整数型
.局部变量 大漠, 大漠中文版



句柄 ＝ 大漠多线程信息 [i].窗口句柄
调试输出 (句柄)
大漠 ＝ 大漠多线程信息 [i].大漠
.如果 (大漠.绑定 (句柄, “normal”, “normal”, “normal”, 0) ＝ 1)
    调试输出 (“线程” ＋ 到文本 (i) ＋ “绑定成功”)
.否则
    调试输出 (“线程” ＋ 到文本 (i) ＋ “绑定失败”)
.如果结束


.子程序 主程序
.参数 i, 整数型
.局部变量 大漠, 大漠中文版



大漠 ＝ 大漠多线程信息 [i].大漠
.计次循环首 (20, )
    大漠.键盘_按键 (#B键)
    辅助延时 (200)
    处理事件 ()

.计次循环尾 ()
' 调试输出 (句柄)
' 大漠 ＝ 大漠多线程信息 [i].大漠


.子程序 _按钮开始_被单击

线程_启动 (&开始任务, , 主线程句柄)


.子程序 _停_被单击



.子程序 开始任务
.局部变量 i, 整数型
.局部变量 句柄数组, 整数型, , "0"


初始化COM库 ()
' i ＝ 线程_找空余位置 ()
窗口_枚举句柄2_祥云 (句柄数组, “”, “无标题 - 记事本”)

.计次循环首 (2, i)
    大漠多线程信息 [i].窗口句柄 ＝ 句柄数组 [i]
    .如果 (大漠多线程信息 [i].大漠.创建对象 () ＝ 假)
        调试输出 (“创建失败”)
    .否则

    .如果结束
    .如果 (线程_启动 (&初始化, i, 大漠多线程信息 [i].线程句柄) ＝ 假)

    .否则
        调试输出 (“线程启动失败”)
    .如果结束
    调试输出 (“线程” ＋ 到文本 (i) ＋ “启动成功”)
    辅助延时 (3000)
.计次循环尾 ()


* “线程启动失败”
* 918748
* “线程1启动成功”
被调试易程序运行完毕

爱慧慧

上传源码看看

shengchun

这个是脚本源码.

wffhhy

线程启动失败