多线程崩溃
.版本 2.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 主线程句柄, 整数型
.子程序 __启动窗口_创建完毕
.如果 (判断大漠组件是否被注册 () ＝ 假)
大漠注册 ()
.否则
.如果结束
.子程序 初始化
.参数 i, 整数型
初始化COM库 ()
绑定游戏 (i)
主程序 (i)
.子程序 绑定游戏
.参数 i, 整数型
.局部变量 句柄, 整数型
.局部变量 大漠, 大漠中文版
句柄 ＝ 大漠多线程信息 .窗口句柄
' 初始化COM库 ()
调试输出 (句柄)
大漠 ＝ 大漠多线程信息 .大漠
.' 如果 (大漠.绑定 (句柄, “dx”, “windows”, “windows”, 0) ＝ 1)
' 调试输出 (“线程” ＋ 到文本 (i) ＋ “绑定成功”)
.否则
' 调试输出 (“线程” ＋ 到文本 (i) ＋ “绑定失败”)
.如果结束
.子程序 主程序
.参数 i, 整数型
.局部变量 大漠, 大漠中文版
大漠 ＝ 大漠多线程信息 .大漠
.计次循环首 (20, )
大漠.键盘_按键 (#B键)
辅助延时 (200)
处理事件 ()
.计次循环尾 ()
.子程序 _开始任务_被单击
线程_启动 (&开始任务, , 主线程句柄)
.子程序 _停止任务_被单击
线程_强制结束 (主线程句柄)
.子程序 开始任务
.局部变量 i, 整数型
.局部变量 句柄数组, 整数型, , "0"
初始化COM库 ()
' i ＝ 线程_找空余位置 ()
窗口_枚举句柄2_祥云 (句柄数组, “Notepad”, “记事本”)
调试输出 (句柄数组)
.计次循环首 (3, i)
大漠多线程信息 .窗口句柄 ＝ 窗口_取句柄EX (句柄数组 , , “Edit”, )
.如果真 (大漠多线程信息 .大漠.创建对象 () ＝ 假)
调试输出 (“创建失败”)
.如果真结束
.如果 (线程_启动 (&初始化, i, 大漠多线程信息 .线程句柄) ＝ 假)
调试输出 (“线程启动失败”)
.否则
调试输出 (“线程” ＋ 到文本 (i) ＋ “启动成功”)
调试输出 (大漠多线程信息 .线程句柄)
.如果结束
辅助延时 (3000)
.计次循环尾 ()
运行以后直接崩溃在
大漠 ＝ 大漠多线程信息 .大漠
这边，请帮忙看一下
子程序绑定游戏中的 【大漠 ＝ 大漠多线程信息 .大漠】 直接崩溃
页:
[1]