为编程爱好者分享易语言教程源码的资源网

网站首页 > 易语言相关 > 易语言例程 正文

易语言基于事件对象的多线程同步源码

三叶资源网 2021-04-27 12:05:25 易语言例程 1961 ℃ 1 评论

这种同步方法通常可以用在post中,拨号前先同步可能避免数据没有返回就启动了拨号

需要调用到四个windows API函数

CreateEvent

ResetEvent 

SetEvent 

WaitForSingleObject

.版本 2
.支持库 EThread

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

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

全_post事件对象句柄 = CreateEvent (0, 真, 假, “post事件对象”)
ResetEvent (全_post事件对象句柄)

.子程序 _按钮1_被单击
.局部变量 局_线程句柄, 整数型

编辑框1.内容 = “”
ResetEvent (全_post事件对象句柄)
启动线程 (&子程序_启动, , 局_线程句柄)
关闭线程句柄 (局_线程句柄)

.子程序 子程序_启动
.局部变量 局_计次, 整数型
.局部变量 局_线程句柄, 整数型

.计次循环首 (5, 局_计次)
    启动线程 (&子程序_工作线程, 局_计次, 局_线程句柄)
    关闭线程句柄 (局_线程句柄)
    处理事件 ()
    程序_延时 (1)
.计次循环尾 ()

.子程序 子程序_工作线程
.参数 参_线程数

编辑框1.加入文本 (“事件无信号,请点击【放行】按钮--线程【” + 到文本 (参_线程数) + “】等待中...” + #换行符)
WaitForSingleObject (全_post事件对象句柄, -1)
编辑框1.加入文本 (“线程【” + 到文本 (参_线程数) + “】工作结束...” + #换行符)

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

SetEvent (全_post事件对象句柄)

@付笑


文件下载

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575

已有1位网友发表了看法:

  • yiyuyan

    yiyuyan  评论于 [2021-05-19 15:48:51]  回复

    多线程同步,分享一个基于事件对象的多线程同步源码

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网⑤群:三叶资源网⑤群

网站分类
随机tag
网页操作变量数组伊对APP协议httpwacth小米电视遥控器网站开发框架API实例源码易语言改名酷Q源代码永辉生活notepd++插件模板python基础教程动态加密算法Windows身份验证协程模块JavaScript伪原创编辑框输入提示新浪微博
最新评论