易语言屏幕锁屏工具源码

系统结构:窗口总在最前,钩子函数,注册屏蔽,解除屏蔽,安装钩子,卸载钩子,下一个钩子,CopyMemory,GetModuleHandleA,SetWindowPos,

======窗口程序集1
           |  |
           |  |------ _编辑框_解锁密码框_内容被改变
           |  |
           |  |------ _窗口1_锁屏框_创建完毕
           |  |
           |  |------ 窗口总在最前
           |  |
           |  |------ _图形按钮1_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ 钩子函数
           |  |
           |  |------ 注册屏蔽
           |  |
           |  |------ 解除屏蔽
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |
======窗口程序集2
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ _图形按钮1_被单击
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _编辑框_密码框_内容被改变
           |  |
           |  |------ _编辑框_重复密码框_内容被改变
           |  |
           |  |------ _图形按钮_最小化_被单击
           |  |
           |  |------ _图形按钮_关闭_被单击
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   安装钩子
           |  |
           |  |---[dll]------   卸载钩子
           |  |
           |  |---[dll]------   下一个钩子
           |  |
           |  |---[dll]------   CopyMemory
           |  |
           |  |---[dll]------   GetModuleHandleA
           |  |
           |  |---[dll]------   SetWindowPos

调用的DLL命令:

.DLL命令 安装钩子, 整数型, , "SetWindowsHookExA"
    .参数 ihook, 整数型
    .参数 lpfunc, 子程序指针
    .参数 hin, 整数型
    .参数 threadid, 整数型

.DLL命令 卸载钩子, 整数型, , "UnhookWindowsHookEx"
    .参数 hHook, 整数型

.DLL命令 下一个钩子, 整数型, , "CallNextHookEx"
    .参数 hHook, 整数型
    .参数 icode, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 CopyMemory, , , "RtlMoveMemory"
    .参数 Destination, 按键信息, 传址
    .参数 Source, 整数型
    .参数 cbCopy, 整数型

.DLL命令 GetModuleHandleA, 整数型, , "GetModuleHandleA"
    .参数 lpModuleName, 整数型

.DLL命令 SetWindowPos, 整数型, "user32"
    .参数 HWnd, 整数型
    .参数 hWndInsertAfter, 整数型
    .参数 X, 整数型
    .参数 Y, 整数型
    .参数 cx, 整数型
    .参数 cy, 整数型
    .参数 wFlags, 整数型