多线程操作处理带详细注释

易语言 2020-04-20 15:33:40

多线程操作处理带详细注释

进入许可区 (xkz) ' 如果没有线程正在运行,排队中的第一个线程,将会进入下面的操作
处理表项记录 = 处理表项记录 + 1 ' 线程运作 表项+1
局部记录 = 处理表项记录 - 1 ' 多线程运作 赶紧的把表项 记录到局部
超级列表框1.置标题 (局部记录, 2, 到文本 (“开始运算”)) ' 为了直观故意加上的
延时 (100) ' 为了直观故意加上的等待
内容1 = 到整数 (取指定内容 (超级列表框1.取标题 (局部记录, 1), “”, “+”)) ' 分割
内容2 = 到整数 (取指定内容 (超级列表框1.取标题 (局部记录, 1), “+”, “=”)) ' 分割
结果 = 内容1 + 内容2 ' 求和
超级列表框1.置标题 (局部记录, 2, 到文本 (结果)) ' 放进去结果
超级列表框1.置标题 (局部记录, 3, “完毕。线程ID已无效”)
线程数量 = 线程数量 - 1 ' 一个线程到这里就结束了 把数量-1
退出许可区 (xkz) ' 操作完成,线程退出,如果有线程在排队,就会通知下一个线程进入操作
' 因为加了延时,可以看到,加了许可证之后,只有在一个线程处理完成后,才进行下一个线程