DLLL命令表

.版本 2

.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, 整数型

自定义数据类型表

.版本 2

.数据类型 按键信息

.成员 虚拟码, 整数型

.成员 扫描码, 整数型

.成员 标记, 整数型

.成员 时间, 整数型

.成员 额外信息, 整数型

锁屏框

.版本 2

.支持库 eAPI

.程序集 窗口程序集1

.程序集变量 钩子句柄, 整数型

.子程序 _编辑框_解锁密码框_内容被改变

标签2.标题 ＝ “屏幕锁定中。。。”

标签2.文本颜色 ＝ #银白

.子程序 _窗口1_锁屏框_创建完毕

设置窗口透明度 (取窗口句柄 (), 250)

窗口1_锁屏框.左边 ＝ 0

窗口1_锁屏框.顶边 ＝ 0

窗口1_锁屏框.宽度 ＝ 取屏幕宽度 ()

窗口1_锁屏框.高度 ＝ 取屏幕高度 ()

图片框1.左边 ＝ 取屏幕宽度 () ÷ 2 － 图片框1.宽度 ÷ 2

图片框1.顶边 ＝ 取屏幕高度 () ÷ 2 － 图片框1.高度 ÷ 2

注册屏蔽 ()

.子程序 窗口总在最前

.参数 参_窗口句柄, 整数型

SetWindowPos (参_窗口句柄, -1, 0, 0, 0, 0, 位或 (2, 1))

.子程序 _图形按钮1_被单击

_按钮1_被单击 ()

.子程序 _按钮1_被单击

.如果 (编辑框_解锁密码框.内容 ＝ “”)

标签2.标题 ＝ “未输入密码，请重新输入！”

标签2.文本颜色 ＝ #红色

.否则

.如果 (编辑框_解锁密码框.内容 ＝ “123”)

解除屏蔽 ()

结束 ()

.否则

.如果 (编辑框_解锁密码框.内容 ≠ _启动窗口.编辑框_重复密码框.内容)

标签2.标题 ＝ “密码不正确，请重新输入！”

标签2.文本颜色 ＝ #红色

.否则

.如果 (编辑框_解锁密码框.内容 ＝ _启动窗口.编辑框_重复密码框.内容)

解除屏蔽 ()

结束 ()

.否则

.如果结束

.如果结束

.如果结束

.如果结束

.子程序 钩子函数, 整数型

.参数 icode, 整数型

.参数 wparam, 整数型

.参数 lparam, 整数型

.局部变量 按键信息, 按键信息

CopyMemory (按键信息, lparam, 30)

.如果真 (icode ＝ 0)

.如果真 (按键信息.虚拟码 ＝ 91 或 按键信息.虚拟码 ＝ 92) ' 屏蔽Win键

.判断开始 (wparam ＝ 256)

输出调试文本 (“按下Win键！”)

.默认

输出调试文本 (“弹起Win键！”)

.判断结束

返回 (1)

.如果真结束

.如果真 (按键信息.虚拟码 ＝ 27 且 按键信息.扫描码 ＝ 1) ' 屏蔽crlt+Esc

返回 (1)

.如果真结束

.如果真 (按键信息.虚拟码 ＝ 115 且 按键信息.扫描码 ＝ 62) ' 屏蔽alt+f4

返回 (1)

.如果真结束

.如果真 (按键信息.虚拟码 ＝ 9 且 按键信息.扫描码 ＝ 15) ' 屏蔽alt+TAB

返回 (1)

.如果真结束

.如果真 (按键信息.虚拟码 ＝ 32 且 按键信息.扫描码 ＝ 57) ' 屏蔽crlt+空格 左边

返回 (1)

.如果真结束

.如果真 (按键信息.虚拟码 ＝ 161 且 按键信息.扫描码 ＝ 54) ' 屏蔽crlt+空格 右边

返回 (1)

.如果真结束

.如果真 (按键信息.虚拟码 ＝ 160 且 按键信息.扫描码 ＝ 42) ' 屏蔽crlt+SHIFT

返回 (1)

.如果真结束

.如果真 (按键信息.虚拟码 ＝ 46 且 按键信息.扫描码 ＝ 83) ' 屏蔽CAL_DEL_ALT

返回 (1)

.如果真结束

.如果真结束

返回 (下一个钩子 (钩子句柄, icode, wparam, lparam))

.子程序 注册屏蔽

.如果真 (钩子句柄 ＝ 0)

钩子句柄 ＝ 安装钩子 (13, &钩子函数, GetModuleHandleA (0), 0)

.如果 (钩子句柄 ≠ 0)

输出调试文本 (“注册钩子成功！”)

.否则

输出调试文本 (“注册钩子失败！”)

.如果结束

.如果真结束

.子程序 解除屏蔽

.如果真 (钩子句柄 ≠ 0)

.如果 (卸载钩子 (钩子句柄) ≠ 0)

输出调试文本 (“缷载钩子成功！”)

.否则

输出调试文本 (“缷载钩子失败！”)

.如果结束

.如果真结束

.子程序 _时钟1_周期事件

窗口总在最前 (取窗口句柄 ())

锁屏

.版本 2

.支持库 eAPI

.程序集 窗口程序集2

.子程序 __启动窗口_创建完毕

设置窗口透明度 (取窗口句柄 (), 245)

.子程序 _图形按钮1_被单击

_按钮1_被单击 ()

.子程序 _按钮1_被单击

.如果 (编辑框_密码框.内容 ≠ 编辑框_重复密码框.内容)

标签_提示.标题 ＝ “密码不一致，请重新输入！”

标签_提示.文本颜色 ＝ #红色

.否则

.如果 (编辑框_密码框.内容 ＝ “”)

标签_提示.标题 ＝ “未输入密码，请重新输入！”

标签_提示.文本颜色 ＝ #红色

.否则

_启动窗口.可视 ＝ 假

载入 (窗口1_锁屏框, , 真)

.如果结束

.如果结束

.子程序 _编辑框_密码框_内容被改变

标签_提示.标题 ＝ “请输入密码后继续：”

标签_提示.文本颜色 ＝ #白色

.子程序 _编辑框_重复密码框_内容被改变

标签_提示.标题 ＝ “请输入密码后继续：”

标签_提示.文本颜色 ＝ #白色

.子程序 _图形按钮_最小化_被单击

_启动窗口.位置 ＝ 2

.子程序 _图形按钮_关闭_被单击

销毁 ()

运行结果：

总结

以上就是这篇文章的全部内容了，希望本文的内容对大家的学习或者工作具有一定的参考学习价值，谢谢大家对脚本之家的支持。如果你想了解更多相关内容请查看下面相关链接