易语言实现局部热键

系统结构:键盘钩子处理,API_GetForegroundWindow,API_SetWindowsHookEx,GetModuleHandleA,API_RtlMoveMemoryJ,CallNextHookEx,API_UnhookWindowsHookEx,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 键盘钩子处理
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   API_GetForegroundWindow
           |  |
           |  |---[dll]------   API_SetWindowsHookEx
           |  |
           |  |---[dll]------   GetModuleHandleA
           |  |
           |  |---[dll]------   API_RtlMoveMemoryJ
           |  |
           |  |---[dll]------   CallNextHookEx
           |  |
           |  |---[dll]------   API_UnhookWindowsHookEx

调用的DLL命令:

.DLL命令 API_GetForegroundWindow, 整数型, "user32", "GetForegroundWindow", , 获得前台窗口的句柄。这里的“前台窗口”是指前台应用程序的活动窗口  前台窗口的句柄

.DLL命令 API_SetWindowsHookEx, 整数型, "user32", "SetWindowsHookExA", , 安装钩子过程
    .参数 idHook, 整数型
    .参数 lpfn, 子程序指针
    .参数 hmod, 整数型
    .参数 dwThreadId, 整数型

.DLL命令 GetModuleHandleA, 整数型, , "GetModuleHandleA"
    .参数 a, 整数型, , 0

.DLL命令 API_RtlMoveMemoryJ, , "kernel32.dll", "RtlMoveMemory"
    .参数 Destination, 按键信息
    .参数 Source, 整数型
    .参数 Length, 整数型

.DLL命令 CallNextHookEx, 整数型, , "CallNextHookEx"
    .参数 hook, 整数型
    .参数 nCode, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 API_UnhookWindowsHookEx, 整数型, "user32.dll", "UnhookWindowsHookEx", , 卸载一个钩字
    .参数 hook, 整数型