end3428 发表于 2018-2-25 17:24:52

第一款教程4.3课多线程的简单应用问题

.版本 2
.支持库 spec


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


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


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


.如果结束




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


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




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




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




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


大漠 = 大漠多线程信息 .大漠
.计次循环首 (50, )
    大漠.键盘_按键 (#V键)
    辅助延时 (500)
    处理事件 ()
.计次循环尾 ()




.子程序 _按钮1_被单击


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




.子程序 _按钮2_被单击


线程_关闭全部线程 ()
线程_强制结束 (主线程句柄)




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


初始化COM库 ()
' i = 线程_找空余位置 ()
窗口_枚举句柄2_祥云 (句柄数组, “AIONClientWndClass1.0”, “AION”)


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


    .如果结束
    .如果 (线程_启动 (&初始化, i, 大漠多线程信息 .线程句柄) = 假)
      调试输出 (“线程启动失败”)
    .否则
      调试输出 (“线程” + 到文本 (i) + “启动程”)
    .如果结束


    辅助延时 (1000)




.计次循环尾 ()




程序写完运行没有问题,但是点停止任务时就会跳出一个窗口显示运行出错,错误代码1,错误信息,数组成员下标超出定义范围,这个错误应该数组的问题,但是我定义的数组是两个也没有超过定义的范围,出现这个问题怎么解决?


易辅 发表于 2018-3-3 19:01:23

没找到窗口句柄 所以 数组为0也就提示错了
页: [1]
查看完整版本: 第一款教程4.3课多线程的简单应用问题