易语言进程管理源码例程

系统结构:列举进程,取模块路径,画出图标,创建快照,第一个,下一个,取图标指针,画图标,取设备场景,模块1,OpenProcess,TerminateProcess,列举进程,取模块路径,画出图标,CreateToolhelp32Snapshot,Process32First,Process32Next,ExtractIconA,DrawIcon,GetDC,Module32First,OpenProcess,TerminateProcess,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 列举进程
           |  |
           |  |------ 取模块路径
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 画出图标
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _超级列表框1_当前表项被改变
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   创建快照
           |  |
           |  |---[dll]------   第一个
           |  |
           |  |---[dll]------   下一个
           |  |
           |  |---[dll]------   取图标指针
           |  |
           |  |---[dll]------   画图标
           |  |
           |  |---[dll]------   取设备场景
           |  |
           |  |---[dll]------   模块1
           |  |
           |  |---[dll]------   OpenProcess
           |  |
           |  |---[dll]------   TerminateProcess
  ======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 列举进程
           |  |
           |  |------ 取模块路径
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 画出图标
           |  |
           |  |------ _按钮3_被单击
           |  |
           |  |------ _超级列表框1_当前表项被改变
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateToolhelp32Snapshot
           |  |
           |  |---[dll]------   Process32First
           |  |
           |  |---[dll]------   Process32Next
           |  |
           |  |---[dll]------   ExtractIconA
           |  |
           |  |---[dll]------   DrawIcon
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   Module32First
           |  |
           |  |---[dll]------   OpenProcess
           |  |
           |  |---[dll]------   TerminateProcess

调用的DLL命令:

.DLL命令 创建快照, 整数型, , "CreateToolhelp32Snapshot"
    .参数 falg, 整数型
    .参数 id, 整数型

.DLL命令 第一个, 整数型, , "Process32First"
    .参数 h, 整数型
    .参数 p, 进程信息

.DLL命令 下一个, 整数型, , "Process32Next"
    .参数 h, 整数型
    .参数 p, 进程信息

.DLL命令 取图标指针, 整数型, "shell32.dll", "ExtractIconA"
    .参数 窗口句柄, 整数型
    .参数 文件名称, 文本型
    .参数 图标索引, 整数型

.DLL命令 画图标, 整数型, "user32", "DrawIcon"
    .参数 设备场景, 整数型
    .参数 位置x, 整数型
    .参数 位置y, 整数型
    .参数 图标指针, 整数型

.DLL命令 取设备场景, 整数型, "user32", "GetDC"
    .参数 设备句柄, 整数型

.DLL命令 模块1, 整数型, , "Module32First"
    .参数 hsnap, 整数型
    .参数 mod, 模块信息

.DLL命令 OpenProcess, 整数型, , "OpenProcess"
    .参数 ba
    .参数 b
    .参数 id

.DLL命令 TerminateProcess, 整数型, , "TerminateProcess"
    .参数 id
    .参数 a

调用的DLL命令:

.DLL命令 CreateToolhelp32Snapshot, 整数型, , "CreateToolhelp32Snapshot"
    .参数 falg, 整数型
    .参数 id, 整数型

.DLL命令 Process32First, 整数型, , "Process32First"
    .参数 h, 整数型
    .参数 p, 进程信息

.DLL命令 Process32Next, 整数型, , "Process32Next"
    .参数 h, 整数型
    .参数 p, 进程信息

.DLL命令 ExtractIconA, 整数型, "shell32.dll", "ExtractIconA"
    .参数 窗口句柄, 整数型
    .参数 文件名称, 文本型
    .参数 图标索引, 整数型

.DLL命令 DrawIcon, 整数型, "user32", "DrawIcon"
    .参数 设备场景, 整数型
    .参数 位置x, 整数型
    .参数 位置y, 整数型
    .参数 图标指针, 整数型

.DLL命令 GetDC, 整数型, "user32", "GetDC"
    .参数 设备句柄, 整数型

.DLL命令 Module32First, 整数型, , "Module32First"
    .参数 hsnap, 整数型
    .参数 mod, 模块信息

.DLL命令 OpenProcess, 整数型, , "OpenProcess"
    .参数 ba
    .参数 b
    .参数 id

.DLL命令 TerminateProcess, 整数型, , "TerminateProcess"
    .参数 id
    .参数 a