易语言API检测进程是否存在源码

系统结构:进程是否存在,CreateToolhelp32Snapshot,Process32First,Process32Next,CloseHandle,OpenProcess,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ _临时子程序
           |  |
           |  |------ 进程是否存在
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateToolhelp32Snapshot
           |  |
           |  |---[dll]------   Process32First
           |  |
           |  |---[dll]------   Process32Next
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   OpenProcess

调用的DLL命令:

.DLL命令 CreateToolhelp32Snapshot, 整数型, "KERNEL32.dll", "CreateToolhelp32Snapshot"
    .参数 dwFlags, 整数型
    .参数 th32ProcessID, 整数型

.DLL命令 Process32First, 整数型, "KERNEL32.dll", "Process32First"
    .参数 hSnapshot, 整数型
    .参数 lppe, _进程信息

.DLL命令 Process32Next, 整数型, "KERNEL32.dll", "Process32Next"
    .参数 hSnapshot, 整数型
    .参数 lppe, _进程信息

.DLL命令 CloseHandle, 整数型, "KERNEL32.dll", "CloseHandle"
    .参数 hObject, 整数型

.DLL命令 OpenProcess, 整数型, "KERNEL32.dll", "OpenProcess"
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 逻辑型
    .参数 dwProcessId, 整数型