易语言模拟键盘声音源码

系统结构:钩子回调函数,SetWindowsHookExA,CallNextHookEx,UnhookWindowsHookEx,GetModuleHandleA,

======窗口程序集1
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 钩子回调函数
           |  |
           |  |------ _按钮_最小化_被单击
           |  |
           |  |------ _按钮_关闭_被单击
           |  |
           |  |------ __启动窗口_托盘事件
           |  |
           |  |------ _选择框_被单击
           |  |
           |  |------ _热键消息响应_反馈事件
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   SetWindowsHookExA
           |  |
           |  |---[dll]------   CallNextHookEx
           |  |
           |  |---[dll]------   UnhookWindowsHookEx
           |  |
           |  |---[dll]------   GetModuleHandleA

调用的DLL命令:

.DLL命令 SetWindowsHookExA, 整数型, "user32.dll", "SetWindowsHookExA", , , SetWindowsHookEx
    .参数 钩子类型, 整数型, , idHook
    .参数 回调函数地址, 子程序指针, , lpfn
    .参数 实例句柄, 整数型, , hmod
    .参数 线程ID, 整数型, , dwThreadId[0为全局钩子]

.DLL命令 CallNextHookEx, 整数型, "user32.dll", "CallNextHookEx", , , CallNextHookEx
    .参数 钩子句柄, 整数型, , hHook
    .参数 代码值, 整数型, , ncode
    .参数 附加参数1, 整数型, , wParam
    .参数 附加参数2, 整数型, 传址, lParam

.DLL命令 UnhookWindowsHookEx, 整数型, "user32.dll", "UnhookWindowsHookEx", , , UnhookWindowsHookEx
    .参数 钩子句柄, 整数型, , hHook

.DLL命令 GetModuleHandleA, 整数型, , "GetModuleHandleA", , ,
    .参数 程序名, 整数型