求挂机锁源码

铭华

           如题

大家好呵呵

源码区搜索   一下  好多呢！

追忆流年

Q451205927,我最近正好自己写了个，可以屏蔽Alt+F4,而且不能启动任务管理器。

jmao1234

我自己写的，ctrl+F关闭。

lever

.版本 2

.程序集 窗口程序集1
.程序集变量 输入的密码, 文本型
.程序集变量 设置的密码, 文本型
.程序集变量 第一次运行, 逻辑型

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

锁键 (97, 1, 0, 0)
设置的密码 ＝ 取文本注册表项 (“SYSTEMSET”, “SET”, “PMM”, “”)
是否隐藏窗口 ＝ 取数值注册表项 (“SYSTEMSET”, “SET”, “DESK”, 1)
.如果 (设置的密码 ＝ “”)
    第一次运行 ＝ 真
    总在最前 ＝ 假
    解锁按钮.禁止 ＝ 真
    退出按钮.禁止 ＝ 假
    设置按钮.禁止 ＝ 假
    设置按钮.获取焦点 ()
    信息框 (“本程序还未进行设置，请按下设置钮对本程序进行初始设置！”, #信息图标, “信息：”)
.否则
    .如果真 (是否隐藏窗口 ＝ 1)
        位置 ＝ 3
    .如果真结束
    设置鼠标位置 ()
.如果结束


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

输入的密码 ＝ 密码框.内容

.子程序 _解锁按钮_被单击

.如果 (输入的密码 ＝ 设置的密码)
    退出按钮.禁止 ＝ 假
    设置按钮.禁止 ＝ 假
    总在最前 ＝ 假
    锁键 (97, 0, 0, 0)
    取消鼠标限制 (0)
    退出按钮.获取焦点 ()
.否则
    密码框.获取焦点 ()
.如果结束


.子程序 _设置按钮_被单击

载入 (设置窗口, _启动窗口, 真)

.子程序 _退出按钮_被单击

结束 ()

.子程序 设置鼠标位置
.局部变量 RECT, 矩形区域

RECT.Left ＝ _启动窗口.左边
RECT.Top ＝ _启动窗口.顶边 ＋ 30
RECT.Right ＝ _启动窗口.左边 ＋ 135
RECT.Bottom ＝ _启动窗口.顶边 ＋ 128
限制鼠标 (RECT)

462160636

那些我在源码区见过 是原创吗？