悬念 发表于 2017-10-4 22:27:29

易语言线程中使用标签反馈的正确方式

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

.程序集 窗口程序集1

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

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

.子程序 启动1程序
.局部变量 i, 整数型
.局部变量 a, 文本型
.局部变量 句柄, 整数型

句柄 = 标签1.取窗口句柄 ()
.计次循环首 (100, i)
    a = 到文本 (i)
    API_发送消息 (句柄, 32885, 取变量数据地址 (a), 0)
    延迟 (100)
.计次循环尾 ()


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

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

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

启动线程 (&启动2程序, , )

.子程序 启动2程序
.局部变量 i, 整数型
.局部变量 a, 文本型
.局部变量 句柄, 整数型

句柄 = 标签2.取窗口句柄 ()
.计次循环首 (100, i)
    a = 到文本 (i)
    API_发送消息 (句柄, 32885, 取变量数据地址(a), 0)
    延迟 (100)
.计次循环尾 ()


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

标签2.标题 = 指针到文本 (参数一)

易语言线程中标签反馈的正确使用方式


大猪猪在江湖 发表于 2021-3-6 10:54:01

这是个技术活
页: [1]
查看完整版本: 易语言线程中使用标签反馈的正确方式