| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 窗口_句柄枚举进程信息 | 精易_进程信息 | 返回进程ID，进程名，进程名全路径； | |||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 窗口句柄 | 整数型 | ||||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 进程ID | 整数型 | |||||
| 进程信息1 | 精易_进程信息 | |||||
| 进程文件名 | 文本型 | |||||
| 结果 | 整数型 | |||||
| 进程快照 | 整数型 | |||||
| 进程句柄 | 整数型 | |||||
| 进程信息 | PROCESSENTRY32 | |||||
如果真 (GetWindowThreadProcessId (窗口句柄, 进程ID) ≠ 0)
进程信息1.进程ID ＝ 进程ID进程文件名 ＝ 取空白文本 (1024)结果 ＝ GetModuleFileNameExA (OpenProcess (1040, 假, 进程ID), 0, 进程文件名, 1024)如果真 (结果 ≠ 0)进程信息1.进程全路径名 ＝ 到文本 (删首尾空 (进程文件名))进程快照 ＝ CreateToolhelp32Snapshot (15, 0)如果真 (进程快照 ≠ 0)进程信息.dwSize ＝ 296进程句柄 ＝ Process32First (进程快照, 进程信息)
判断循环首 (进程句柄 ≠ 0)如果真 (进程信息.th32ProcessID ＝ 进程ID)进程信息1.进程名 ＝ 到文本 (进程信息.szExeFile)跳出循环 ()进程句柄 ＝ Process32Next (进程快照, 进程信息)
判断循环尾 ()CloseHandle (进程快照)
返回 (进程信息1)
| 数据类型名 | 公开 | 备 注 | ||||
| 精易_进程信息 | ||||||
| 成员名 | 类 型 | 传址 | 数组 | 备 注 | ||
| 进程ID | 整数型 | |||||
| 进程名 | 文本型 | |||||
| 进程全路径名 | 文本型 | |||||
词条作者信息 使用例程