易语言中怎样检测某个程序是否正在运行？

Question

比如说，一个程序名为：登录窗口 我要怎样才能让易语言知道它是否运行，然后执行其他命令？
我用来做键盘记录器，我想让这个记录器指定某个程序记录，如果有别的方法请一并提出来下.
请给出源码，我知道需要做什么，只是不知道这些在易语言里怎样写
最关键的是：子程序[进程是否存在]怎样建立？

Answer 1

这个需要超级模块

.版本 2
.程序集 窗口程序集_启动窗口
.子程序 _按钮1_被单击
.子程序 __启动窗口_创建完毕
时钟1.时钟周期 ＝ 100
.子程序 _时钟1_周期事件
.判断开始 (进程是否存在 (“zmmzdd.exe”))
编辑框1.内容 ＝ “程序已运行”
.默认
编辑框1.内容 ＝ “程序未运行”
.判断结束
.子程序 _编辑框1_内容被改变
zmmzdd.exe是要检测进程的程序。

Answer 2

.版本 2
.支持库 eAPI

.子程序 _按钮1_被单击
.局部变量 进程列表, 进程信息, , "0"
.局部变量 计次, 整数型
.局部变量 存在进程, 逻辑型
.局部变量 要判断的程序名, 文本型

进程列表 ＝ 取系统进程列表 ()
要判断的程序名 ＝ “QQ1.exe” ' 这里的QQ.exe可以改为你想要判断的程序名
.计次循环首 (取数组成员数 (进程列表), 计次)
.如果 (进程列表 [计次].进程名称 ＝ 要判断的程序名)
存在进程 ＝ 真
跳出循环 ()
.否则
存在进程 ＝ 假
.如果结束

.计次循环尾 ()
.判断开始 (存在进程 ＝ 真)
信息框 (“存在进程: ” ＋ 要判断的程序名, 0, )
.默认
信息框 (“不存在进程: ” ＋ 要判断的程序名, 0, )
.判断结束

Answer 3

.如果 (进程是否存在(“要判断的进程名.exe”)=真)
信息框(“检测到进程！”,64,“温馨提示：”)
.否则
信息框(“未能检测到进程！”,16,“温馨提示：”)
.如果结束

Answer 4

可以用进程来判断，现可以用窗口标题来判断

Answer 5

检测进程是否存在，或检测窗口是否存在！