易语言API监控某进程是否退出

我们打开EAPI查找并添加两个API

WaitForSingleObject

OpenProcess

dll源码：

.版本 2

.DLL命令 打开进程_, 整数型, "kernel32.dll", "OpenProcess", , 将句柄返回给过程对象

    .参数 进程对象, 整数型, , dwDesiredAccess

    .参数 继承句柄, 整数型, , bInheritHandle

    .参数 进程标识符, 整数型, , dwProcessId

.DLL命令 API_WaitForSingleObject, 整数型, "kernel32", "WaitForSingleObject", , 监测一个对象

    .参数 hHandle, 整数型

    .参数 dwMilliseconds, 整数型

新建一个子程序写入如下代码：

.版本 2

.子程序 等待, , , 等待进程退出

.参数 进程ID

.局部变量 句柄, 整数型

句柄 ＝ 打开进程_ (2035711, 0, 进程ID)

API_WaitForSingleObject (hProcess, -1)

信息框 (“程序已经退出”, 0, , )

随便打开一个程序，通过任务管理器，查看一下刚打开的程序的PID，并调用新建的子程序 等待（pid）就开始工作了

这时只要关闭随便打开的进程就能看到效果了