新手求助，加载窗口后点绑定就闪退

小小小的新手

.版本 2
.支持库 spec
.支持库 iext

.程序集 窗口程序集_启动窗口

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

大漠_加载 (取运行目录 () ＋ “/dm.dll”)
大漠.创建 ()
大漠.基本_注册 (“”, “”)
调试输出 (大漠.基本_注册 (“”, “”))
.如果 (大漠.基本_注册 (“”, “”) ＝ 1)
    列表框1.插入项目 (0, “插件加载成功”, )
.否则
    列表框1.插入项目 (0, “插件加载失败”, )
.如果结束
初始化COM库 ()


.子程序 _按钮_加载游戏程序_被单击
.局部变量 i, 整数型

窗口_模糊遍历窗口 (, , “2023.1.1”, 句柄数组)
.如果 (取数组成员数 (句柄数组) ≠ 0)
    .计次循环首 (取数组成员数 (句柄数组), i)
        超级列表框1.插入表项 (, , , , , )
        超级列表框1.置标题 (i － 1, 1, 到文本 (句柄数组 [i]))
    .计次循环尾 ()

.否则

.如果结束


.子程序 _按钮_绑定_被单击
.局部变量 返回, 整数型

大漠多线程信息 [超级列表框1.现行选中项 ＋ 1].大漠.创建 ()
大漠 ＝ 大漠多线程信息 [超级列表框1.现行选中项 ＋ 1].大漠

大漠多线程信息 [超级列表框1.现行选中项 ＋ 1].窗口句柄 ＝ 句柄数组 [超级列表框1.现行选中项 ＋ 1]
返回 ＝ 大漠.后台_绑定窗口 (大漠多线程信息 [超级列表框1.现行选中项 ＋ 1].窗口句柄, “gdi”, “windows3”, “windows”, 0)
.如果 (返回 ＝ 1)

.否则

.如果结束
列表框1.插入项目 (0, “绑定成功”, )
超级列表框1.置标题 (超级列表框1.现行选中项, 7, “绑定成功”)
列表框1.插入项目 (0, “绑定失败”, )
超级列表框1.置标题 (超级列表框1.现行选中项, 7, “绑定失败”)



.子程序 _按钮_解绑_被单击
.局部变量 返回, 整数型

大漠 ＝ 大漠多线程信息 [超级列表框1.现行选中项 ＋ 1].大漠
返回 ＝ 大漠.后台_解绑窗口 ()
.如果 (返回 ＝ 1)
    列表框1.插入项目 (0, “解绑成功”, )
    超级列表框1.置标题 (超级列表框1.现行选中项, 7, “解绑成功”)
.否则
    列表框1.插入项目 (0, “解绑失败”, )
    超级列表框1.置标题 (超级列表框1.现行选中项, 7, “解绑失败”)
.如果结束

cherryy

大漠.创建 () 这个代码放到第一个看看， 创建  后再做大漠的任何操作

ponlycrazy

1111111111111111111111

ponlycrazy

6666666666666666666666666

小小小的新手

cherryy 发表于 2025-9-15 14:59
大漠.创建 () 这个代码放到第一个看看， 创建  后再做大漠的任何操作

还是一样的，加载后，选中行，点绑定就闪退，

小小小的新手

.版本 2

.全局变量 大漠, 大漠中文
.全局变量 句柄数组, 整数型, , "0"
.全局变量 大漠多线程信息, 大漠多线程信息, , "20"
.全局变量 许可证, 整数型

山东省菏泽市

1111111111111111

RainCharm

看到你写的不出问题才怪，说了不要生气，主打一个乱写。不是写的多就对，有时候往往是画蛇添足

小小小的新手

hongqingfeng 发表于 2025-9-16 16:13
看到你写的不出问题才怪，说了不要生气，主打一个乱写。不是写的多就对，有时候往往是画蛇添足 ...

所以这不是来请教了嘛