易语言linux程序一运行就结束进程,易语言問題 怎么判断程序程序已经运行,如果运行就结束,防止打开多个窗口。...

---判断窗口标题

.版本 2.支持库 eAPI

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

.局部变量 i, 整数型

.局部变量 wins, 文本型, , "0"

wins ＝ 取所有窗口列表 ()

.计次循环首 (取数组成员数 (wins), )

i ＝ i ＋ 1

.如果 (取窗口标题 (到数值 (wins [i])) ＝ 取窗口标题 (取窗口句柄 ()))

结束 ()

.否则

.如果结束

.计次循环尾 ()

' 记住窗口一定要有标题！

---判断进程

.版本 2.支持库 eAPI

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

.局部变量 进程列表, 进程信息, , "0"

.局部变量 临时名称, 文本型

.局部变量 第一位置, 整数型

.局部变量 第二位置, 整数型

.局部变量 临时文本, 文本型

.局部变量 成员, 整数型

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

临时名称 ＝ 取执行文件名 ()

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

临时文本 ＝ 临时文本 ＋ 进程列表 [成员].进程名称

.计次循环尾 ()

第一位置 ＝ 寻找文本 (临时文本, 临时名称, , 真)

第二位置 ＝ 寻找文本 (临时文本, 临时名称, 第一位置 ＋ 2, 真)

.如果真 (第二位置 ＞ 第一位置)

信息框 (“该程序正在运行中...” ＋ #换行符 ＋ “请不要重复运行...”, #警告图标, “提示信息”)

结束 ()

取消

评论