易语言如何禁止程序双开

.版本 2

.DLL命令 打开事件对象, 整数型, "kernel32", "OpenEventA"

.参数 访问方法, 整数型

.参数 句柄继承, 逻辑型

.参数 对象名称, 文本型

.DLL命令 创建事件对象, 整数型, "kernel32", "CreateEventA"

.参数 安全特性, 整数型

.参数 重设事件, 逻辑型

.参数 触发状态, 逻辑型

.参数 对象名称, 文本型

-----------------------------------------------------------------------

.版本 2

.支持库 iext

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

.如果真 (程序是否已运行 (“你的程序名称”))

信息框 (“程序已运行！”, #错误图标, “错误”)

结束 ()

.如果真结束

-------------------------------------------------------------------------

.版本 2

.支持库 iext

.子程序 程序是否已运行, 逻辑型, 公开, 判断是否已经运行，已运行返回真，未运行返回假，若为假，便创建禁止运行.

.参数 文本, 文本型

.如果真 (打开事件对象 (2031619, 假, 文本) ≠ 0)

返回 (真)

.如果真结束

创建事件对象 (0, 假, 假, 文本)

返回 (假)

楼上的回答 调用dll命令的，太复杂，我有简单的。

图片看不清楚，可以复制以下内容。

.版本 2

.支持库 eAPI

.子程序 进程是否重复, 逻辑型, 公开, 如果相同的进程名称有2个或以上，则返回 真，1个或以下则返回 假。

.参数 待检测进程, 文本型, , 进程名称，例："QQ.exe"

.局部变量 进程数组, 进程信息, , "0"

.局部变量 n, 整数型

.局部变量 判断重复, 整数型

进程数组 ＝ 取系统进程列表 ()

.计次循环首 (取数组成员数 (进程数组), n)

.如果真 (到小写 (进程数组 [n].进程名称) ＝ 到小写 (待检测进程))

判断重复 ＝ 判断重复 ＋ 1

.如果真 (判断重复 ≥ 2)

返回 (真)

.如果真结束

.如果真结束

处理事件 ()

.计次循环尾 ()

返回 (假)

––––––––––

调用子程序例子:

如果真(进程是否重复(“本软件名称.exe”)＝真)

信息框("本程序正在运行中，禁止重复运行"，0，，)

返回()

如果真结束

近期上市的部分手机支持同时打开两个相同的应用。首先在正常模式下下载需要的应用，然后按照如下方式 *** 作：

方式1：通过安全文件夹方式：应用程序-Samsung-安全文件夹-三星账号登陆并设置密码。进入安全文件夹后，点击添加，即可显示支持同时运行的应用，选择添加即可。

方式2：通过My Knox方式：在My knox界面-点击右上角菜单，选择"添加应用程序"，勾选需要的软件添加即可。

方式3：若您的机器不支持安全文件夹或My Knox功能，可尝试下载安装软件的不同版本尝试。

---