易语言热键模块源码

系统结构:取执行返回,取进程文件名,置拖放,WindowProc,查找QQ号码,新窗口程序,注册热键,撤销指定热键,撤销所有热键,CreateToolhelp32Snapshot,Process32First,Process32Next,OpenProcess,CloseHandle,ReadProcessMemory,VirtualQueryEx,SetWindowLongA,CallWindowProcA,api_拖放回调,api_命令回调,RegisterHotKey,UnregisterHotKey,DragFinish,DragAcceptFiles,DragQueryFileA,DefWindowProcA,创建管道,创建进程,读文件,关闭句柄,获取进程状态,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 取执行返回
           |  |
           |  |------ 取进程文件名
           |  |
           |  |------ 置拖放
           |  |
           |  |------ WindowProc
           |  |
           |  |------ 查找QQ号码
           |  |
           |  |------ 新窗口程序
           |  |
           |  |------ 注册热键
           |  |
           |  |------ 撤销指定热键
           |  |
           |  |------ 撤销所有热键
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateToolhelp32Snapshot
           |  |
           |  |---[dll]------   Process32First
           |  |
           |  |---[dll]------   Process32Next
           |  |
           |  |---[dll]------   OpenProcess
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   ReadProcessMemory
           |  |
           |  |---[dll]------   VirtualQueryEx
           |  |
           |  |---[dll]------   SetWindowLongA
           |  |
           |  |---[dll]------   CallWindowProcA
           |  |
           |  |---[dll]------   api_拖放回调
           |  |
           |  |---[dll]------   api_命令回调
           |  |
           |  |---[dll]------   RegisterHotKey
           |  |
           |  |---[dll]------   UnregisterHotKey
           |  |
           |  |---[dll]------   DragFinish
           |  |
           |  |---[dll]------   DragAcceptFiles
           |  |
           |  |---[dll]------   DragQueryFileA
           |  |
           |  |---[dll]------   DefWindowProcA
           |  |
           |  |---[dll]------   创建管道
           |  |
           |  |---[dll]------   创建进程
           |  |
           |  |---[dll]------   读文件
           |  |
           |  |---[dll]------   关闭句柄
           |  |
           |  |---[dll]------   获取进程状态

调用的DLL命令:

.DLL命令 CreateToolhelp32Snapshot, 整数型
    .参数 lFlags, 整数型
    .参数 lProcessID, 整数型

.DLL命令 Process32First, 整数型
    .参数 hSnapShot, 整数型
    .参数 uProcess, PROCESSENTRY32

.DLL命令 Process32Next, 整数型
    .参数 hSnapShot, 整数型
    .参数 uProcess, PROCESSENTRY32

.DLL命令 OpenProcess, 整数型
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 整数型
    .参数 dwProcessId, 整数型

.DLL命令 CloseHandle, 整数型
    .参数 hObject, 整数型

.DLL命令 ReadProcessMemory, 整数型
    .参数 hProcess, 整数型
    .参数 lpBaseAddress, 整数型
    .参数 lpBuffer, 字节集, 传址
    .参数 nSize, 整数型
    .参数 lpNumberOfBytesWritten, 整数型

.DLL命令 VirtualQueryEx, 整数型
    .参数 hProcess, 整数型
    .参数 lpAddress, 整数型
    .参数 info, MEMORY_BASIC_INFORMATION, 传址
    .参数 dwLength, 整数型

.DLL命令 SetWindowLongA, 子程序指针
    .参数 窗口句柄, 整数型
    .参数 特征索引, 整数型
    .参数 新特征, 子程序指针

.DLL命令 CallWindowProcA, 整数型
    .参数 窗口程序程序指针, 子程序指针
    .参数 窗口句柄, 整数型
    .参数 消息, 整数型
    .参数 参数1
    .参数 参数2

.DLL命令 api_拖放回调, 整数型, , "CallWindowProcA"
    .参数 窗口程序程序指针, 子程序指针
    .参数 拖放数量, 整数型
    .参数 列位置, 整数型
    .参数 文件名, 文本型
    .参数 保留参数

.DLL命令 api_命令回调, , , "CallWindowProcA"
    .参数 窗口程序程序指针, 子程序指针
    .参数 状态, 逻辑型
    .参数 内容, 文本型
    .参数 保留参数1
    .参数 保留参数2

.DLL命令 RegisterHotKey, 整数型, "user32.dll", "RegisterHotKey"
    .参数 hWnd, 整数型
    .参数 id, 整数型
    .参数 fsModifoers, 整数型
    .参数 vk, 整数型

.DLL命令 UnregisterHotKey, 整数型, , "UnregisterHotKey"
    .参数 hWnd, 整数型
    .参数 HotKeyID, 整数型

.DLL命令 DragFinish
    .参数 dw

.DLL命令 DragAcceptFiles
    .参数 hwnd
    .参数 dw

.DLL命令 DragQueryFileA, 整数型
    .参数 HDROP
    .参数 UINT
    .参数 lpStr, 文本型, 传址
    .参数 ch

.DLL命令 DefWindowProcA, 整数型
    .参数 hwnd
    .参数 msg
    .参数 dw1
    .参数 dw2

.DLL命令 创建管道, 整数型, , "CreatePipe"
    .参数 输出管道, 整数型, 传址
    .参数 输入管道, 整数型, 传址
    .参数 管道属性, security属性, 传址
    .参数 尺寸, 整数型

.DLL命令 创建进程, 整数型, , "CreateProcessA"
    .参数 程序名称, 整数型, , 32位程序用，可设为文本型
    .参数 命令行, 文本型, 传址
    .参数 进程属性, security属性, 传址
    .参数 线程属性, security属性, 传址
    .参数 参数一, 整数型
    .参数 参数二, 整数型
    .参数 参数三, 整数型, 传址
    .参数 运行目录, 整数型, , 如需指定运行目录设为文本行
    .参数 启动信息, 启动信息, 传址
    .参数 进程信息, 进程信息, 传址

.DLL命令 读文件, 整数型, , "ReadFile"
    .参数 文件号, 整数型
    .参数 缓存, 字节集, 传址
    .参数 读取尺寸, 整数型
    .参数 实际尺寸, 整数型, 传址
    .参数 参数, 整数型

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

.DLL命令 获取进程状态, 整数型, , "GetExitCodeProcess"
    .参数 进程号, 整数型
    .参数 进程状态, 整数型, 传址