为编程爱好者分享易语言教程源码的资源网
好用的代理IP,游戏必备 ____广告位招租____ 服务器99/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器
好用的代理IP,游戏必备 ____广告位招租____ 服务器低至38/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器

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

易语言互斥体防多开源代码

三叶资源网 2019-08-06 16:56:16 易语言例程 2839 ℃ 5 评论
.版本 2

.程序集 窗口程序集_启动窗口
.程序集变量 事件对象句柄, 整数型

.子程序 程序是否已运行, 逻辑型, 公开, 真表示已经运行,假表示还未运行
.参数 标志文本, 文本型, , 可以是任何文本,但是最好要长一点以保证和系统中已有其他事件对象的名称不相冲突。

.如果真 (打开事件对象 (2031619, 假, 标志文本) ≠ 0)
    返回 (真)
.如果真结束
事件对象句柄 = 创建事件对象 (0, 假, 假, 标志文本)
返回 (假)

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

.如果真 (程序是否已运行 (“禁止多次运行”) = 真)
    信息框 (“程序已经运行!”, 0, , )
    销毁 ()
.如果真结束


.子程序 __启动窗口_将被销毁

关闭事件对象 (事件对象句柄)

@upring

文件下载

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

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

  • 资源网

    资源网  评论于 [2019-10-11 01:36:42]  回复

    易语言互斥体

  • 创建号

    创建号  评论于 [2020-03-23 10:29:08]  回复

    易语言DLl窗口互斥

欢迎 发表评论:

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

网站分类
随机tag
宽带拨号登录百度登录读写IE浏览器胆码随机网易云音乐播放器位图斜切设置系统透明风格界面IMAP收信Asm开心ol前台打怪多功能记事本SQL语句驱动级模拟按键加密与解密第四版仓库货位条码打印sign算法永辉生活登陆
最新评论