多线程测试，一用线程就报错

hkq8759

阿斯顿萨达 发表于 2012-1-10 21:33
多线程用标签反馈事件调用代码

正在统计需要编译的子程序
正在编译...
错误(10043): “_标签1_反馈事件”子程序的参数 2 不能接受空数据。

hkq8759

'大侠可以复制下来测试，只要不用大漠找图那句就没事，一用就出错。
.版本 2
.支持库 EThread
.支持库 dm
.支持库 spec

.程序集 窗口程序集1
.程序集变量 s, 整数型

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

启动线程 (&启动1程序, , s)
' 启动1程序 ()

.子程序 启动1程序
.局部变量 i, 整数型
.局部变量 a, 文本型
.局部变量 句柄, 整数型
.局部变量 dm, dmsoft
.局部变量 大漠找图, 文本型

句柄 ＝ 标签1.取窗口句柄 ()
大漠找图 ＝ dm.FindColorE (369, 46, 394, 66, “ffff00-000000”, 1, 0)
.计次循环首 (20, i)
    a ＝ 到文本 (i)
    API_发送消息 (句柄, 32885, 取变量数据地址 (a), 0)
    延迟 (100)
.计次循环尾 ()
信息框 (大漠找图, 0, )

.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型

标签1.标题 ＝ 指针到文本 (参数一)

huanlong

学习一下了

贪吃

对象在子线程使用之前要加API 命令
' 初始化com组件
CoInitialize (0)
不然会出错，大漠调用要用对象方式
对象.创建（"dm.dmsoft"，）
楼主直接导入不能静态编译的。
个人感觉如果是操作控件要用标签反馈事件，否则没必要。