易语言鼠标记录精灵源码

系统结构:开始HOOK,hook,停止HOOK,模拟,鼠标键,热键回调,HOOK热键,监视处理,CallNextHookEx,卸载钩子,安装钩子,GetModuleHandleA,CreateWaitableTimerA,SetWaitableTimer,MsgWaitForMultipleObjects,CopyMemory,

======窗口程序集
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ 开始HOOK
           |  |
           |  |------ hook
           |  |
           |  |------ 停止HOOK
           |  |
           |  |------ 模拟
           |  |
           |  |------ _延时
           |  |
           |  |------ _超级列表框1_右键单击表项
           |  |
           |  |------ _清空脚本_被选择
           |  |
           |  |------ 鼠标键
           |  |
           |  |------ 热键回调
           |  |
           |  |------ HOOK热键
           |  |
           |  |------ 监视处理
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   CallNextHookEx
           |  |
           |  |---[dll]------   卸载钩子
           |  |
           |  |---[dll]------   安装钩子
           |  |
           |  |---[dll]------   GetModuleHandleA
           |  |
           |  |---[dll]------   _移动鼠标
           |  |
           |  |---[dll]------   CreateWaitableTimerA
           |  |
           |  |---[dll]------   SetWaitableTimer
           |  |
           |  |---[dll]------   MsgWaitForMultipleObjects
           |  |
           |  |---[dll]------   _关闭对象
           |  |
           |  |---[dll]------   _控制鼠标
           |  |
           |  |---[dll]------   CopyMemory

调用的DLL命令:

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

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

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

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

.DLL命令 _移动鼠标, , , "SetCursorPos", 公开, user32.dll
    .参数 x, 整数型
    .参数 y, 整数型

.DLL命令 CreateWaitableTimerA, 整数型, , "CreateWaitableTimerA"
    .参数 lpTimerAttributes, 整数型
    .参数 bManualReset, 逻辑型
    .参数 lpTimerName, 整数型

.DLL命令 SetWaitableTimer, 整数型, , "SetWaitableTimer"
    .参数 hTimer, 整数型
    .参数 pDueTime, SSS
    .参数 lPeriod, 整数型
    .参数 pfnCompletionRoutine, 整数型
    .参数 lpArgToCompletionRoutine, 整数型
    .参数 fResume, 逻辑型

.DLL命令 MsgWaitForMultipleObjects, 整数型, , "MsgWaitForMultipleObjects"
    .参数 nCount, 整数型
    .参数 pHandles, 整数型, 传址
    .参数 fWaitAll, 逻辑型
    .参数 dwMilliseconds, 整数型
    .参数 dwWakeMask, 整数型

.DLL命令 _关闭对象, 整数型, , "CloseHandle", 公开, kernel32.dll
    .参数 对象句柄, 整数型

.DLL命令 _控制鼠标, , , "mouse_event", , user32.dll
    .参数 dwFlags, 整数型
    .参数 dx, 整数型
    .参数 dy, 整数型
    .参数 cButtons, 整数型
    .参数 dwExtraInfo, 整数型

.DLL命令 CopyMemory, , , "RtlMoveMemory", , CopyMemory
    .参数 Destination, MSG, 传址
    .参数 Source, 整数型
    .参数 Length, 整数型