易语言结束进程源码

系统结构:取线程信息,枚举进程_,关闭进程线程,取创建32位帮助工具快照_,API_Process32First,sizeof,sizeof2,打开进程_,API_Thread32First,API_枚举任务窗口,API_Process32Next,API_Thread32Next,OpenThread,关闭句柄_,关闭线程_,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 取线程信息
           |  |
           |  |------ 枚举进程_
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _列表框1_列表项被选择
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ 关闭进程线程
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   取创建32位帮助工具快照_
           |  |
           |  |---[dll]------   API_Process32First
           |  |
           |  |---[dll]------   sizeof
           |  |
           |  |---[dll]------   sizeof2
           |  |
           |  |---[dll]------   打开进程_
           |  |
           |  |---[dll]------   API_Thread32First
           |  |
           |  |---[dll]------   API_枚举任务窗口
           |  |
           |  |---[dll]------   API_Process32Next
           |  |
           |  |---[dll]------   API_Thread32Next
           |  |
           |  |---[dll]------   OpenThread
           |  |
           |  |---[dll]------   关闭句柄_
           |  |
           |  |---[dll]------   关闭线程_

调用的DLL命令:

.DLL命令 取创建32位帮助工具快照_, 整数型, "kernel32.dll", "CreateToolhelp32Snapshot", , , 取进程信息
    .参数 标志, 整数型, , lFlags
    .参数 进程标识符, 整数型, , lProcessID

.DLL命令 API_Process32First, 整数型, "KERNEL32.DLL", "Process32First"
    .参数 hSnapshot, 整数型
    .参数 lppe, LPPROCESSENTRY32

.DLL命令 sizeof, 整数型, "ComCtl32.dll", "#74", , sizeof_数据类型1
    .参数 参数一, LPPROCESSENTRY32, 传址

.DLL命令 sizeof2, 整数型, "ComCtl32.dll", "#74", , sizeof_数据类型1
    .参数 参数一, THREADENTRY32, 传址

.DLL命令 打开进程_, 整数型, "kernel32.dll", "OpenProcess", , , 将句柄返回给过程对象
    .参数 进程对象, 整数型, , dwDesiredAccess
    .参数 继承句柄, 整数型, , bInheritHandle
    .参数 进程标识符, 整数型, , dwProcessId

.DLL命令 API_Thread32First, 整数型, "KERNEL32.DLL", "Thread32First"
    .参数 hSnapshot, 整数型
    .参数 lpte, THREADENTRY32

.DLL命令 API_枚举任务窗口, 整数型, "user32", "EnumThreadWindows", , 枚举与指定任务相关的窗口  非零表示成功，零表示失败
    .参数 线程标识符, 整数型, , 某线程的标识符，它的窗口将被枚举
    .参数 函数指针, 整数型, , 指向一个函数的指针，要求为每个子窗口都调用这个函数。用AddressOf运算符获得函数在标准模式下的地址
    .参数 自定义数值, 整数型, , 在枚举期间，传递给dwcbkd32d.ocx定制控件之EnumWindows事件的值。这个值的含义是由程序员规定的;

.DLL命令 API_Process32Next, 整数型, , "Process32Next"
    .参数 h, 整数型
    .参数 p, LPPROCESSENTRY32

.DLL命令 API_Thread32Next, 整数型, "KERNEL32.DLL", "Thread32Next"
    .参数 hSnapshot, 整数型
    .参数 lpte, THREADENTRY32

.DLL命令 OpenThread, 整数型, "Kernel32.dll", "OpenThread"
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 整数型
    .参数 dwThreadId, 整数型

.DLL命令 关闭句柄_, 整数型, , "CloseHandle"
    .参数 hObject, 整数型

.DLL命令 关闭线程_, 整数型, "kernel32", "TerminateThread"
    .参数 线程句柄
    .参数 退出代码