键盘钩子

系统结构:MyProc,CreateWindowEx,CallNextHookEx,CallWindowProc,GetActiveWindow,SetWindowsHookEx,GetActiveWindow1,GetWindowLong,CloseHandle,UnHookWindowsHookEx,SetWindowLong,

======Main
           |  |
           |  |------ MyProc
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _编辑框1_失去焦点
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CreateWindowEx
           |  |
           |  |---[dll]------   CallNextHookEx
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   GetActiveWindow
           |  |
           |  |---[dll]------   SetWindowsHookEx
           |  |
           |  |---[dll]------   GetActiveWindow1
           |  |
           |  |---[dll]------   GetWindowLong
           |  |
           |  |---[dll]------   CloseHandle
           |  |
           |  |---[dll]------   UnHookWindowsHookEx
           |  |
           |  |---[dll]------   SetWindowLong

调用的DLL命令:

.DLL命令 CreateWindowEx, 整数型, , "CreateWindowExA"
    .参数 dwExStle, 整数型
    .参数 IpClassName, 文本型
    .参数 lpWindowName, 文本型
    .参数 dwStyle, 整数型
    .参数 x, 整数型
    .参数 y, 整数型
    .参数 nWidth, 整数型
    .参数 nHeight, 整数型
    .参数 hWndParent, 整数型
    .参数 hMenu, 文本型
    .参数 hlnstance, 整数型
    .参数 lpParam, 文本型

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

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

.DLL命令 GetActiveWindow, 整数型, , "GetActiveWindow", , 取活动窗口的Handle

.DLL命令 SetWindowsHookEx, 整数型, , "SetWindowsHookExA", , 安装一个钩子
    .参数 idHook, 整数型, , HOOK类型
    .参数 lpfn, 子程序指针, , 新的窗口过程(Procedure的类型见MyProc)
    .参数 hmod, 整数型, , 实例句柄
    .参数 dwThreadId, 整数型, , 进程ID

.DLL命令 GetActiveWindow1, 整数型, , "GetActiveWindow", , 取活动窗口的Handle

.DLL命令 GetWindowLong, 整数型, , "GetWindowLongA", , 取窗口信息
    .参数 hnd, 整数型
    .参数 nindex, 整数型

.DLL命令 CloseHandle, 整数型, , "CloseHandle"
    .参数 obj, 整数型

.DLL命令 UnHookWindowsHookEx, 整数型, , "UnHookWindowsHookEx", , 卸载一个钩字
    .参数 hhk, 整数型

.DLL命令 SetWindowLong, 子程序指针, , "SetWindowLongA"
    .参数 hnd, 整数型
    .参数 nindex, 整数型
    .参数 dwNewLong, 子程序指针