当前位置:首页 » 操作系统 » 挂机锁源码

挂机锁源码

发布时间: 2022-05-13 21:45:12

Ⅰ delphi挂机锁代码

center.js
iutil.js
jq-corners.js
jquery.js
visual_jquery.js

Ⅱ 求易语言挂机锁源码

.版本
2.支持库
shellEx.支持库
iext
.
子程序
_窗口1_创建完毕
窗口1.左边

0窗口1.
顶边

0窗口1.高度

取屏幕高度
()
'
这些代码能看得懂吧!试一下效果!窗口1.宽度

取屏幕宽度
()a

注册热键
(取
窗口句柄
(),
标签1.取窗口句柄
(),
4,
#F4键)
'
4就是功能键alt键了.b

注册热键
(取窗口句柄
(),
标签1.取窗口句柄
(),
4,
#
Tab键
)
'
现在来禁止
win键
.用一个模块来禁止.'
屏蔽win键
()
'
就这样就行了.哈哈
.子程序
_按钮1_被单击
.判断开始
(编辑框1.内容

_启动窗口.编辑框1.内容)
'
意思是窗口1的编辑框的内容不等于_启动窗口的编辑框的内容则出现信息框.
信息框
(“解锁密码错误,请重新输入!”,
#错误图标,
“提示:”).默认
销毁
()
'
否则关闭窗口1.判断结束
.子程序
_窗口1_尺寸被改变,
,
,
这个之前我也有做过一个动画大家可以去看看.
透明标签2.左边

窗口1.宽度
÷
2

透明标签2.宽度
÷
2
'
窗口1.宽度
÷
2说明左边是在窗口的一半.
那当然
不对了.应该是要中间在窗口中的一半.所以还要减去透明标签2.宽度的一半.透明标签2.顶边

窗口1.高度
÷
2

透明标签2.高度
÷
2
'
高度的意思和宽度的意思一样.透明标签1.左边

窗口1.宽度

透明标签1.宽度
×
2
'
透明标签1.左边在窗口1的宽-两个透明标签的宽度那里透明标签1.顶边

窗口1.高度

8

编辑框1.高度

32
'
透明标签1.顶边在窗口1的高-8再减编辑框的高度.再减去32.大家都有看到一个一个的
小黑点
了吧.他们之间的距离就是8了.
图片框
1.左边

透明标签1.左边
'
以下的都
明白了吧
.图片框1.顶边

透明标签1.顶边

透明标签1.高度

8连续赋值
(图片框1.顶边,
编辑框1.顶边,
按钮1.顶边)
'
这个连续赋值的意思是说编辑框1.顶边,
按钮1.顶边都和图片框1.顶边一样.编辑框1.左边

图片框1.左边

图片框1.宽度

8按钮1.左边

编辑框1.左边

编辑框1.宽度

8'
基本是这样了.我们来试试.有点错误.检查一下.这样效果不错了.现在来说一说.在网络上找的

Ⅲ 谁做过C#的挂机锁,有源码最好,能屏蔽一切按键包括(WIN,CTRL+ESC,ALT+CTRL+DEL)

全局hook 接收到任何按键消息全部不操作就可以。

Ⅳ 易语言 挂机锁 谁有好点的源码 用组合键可以破的不要

.版本 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)

.版本 2

.程序集 窗口程序集2
.程序集变量 密码1, 文本型
.程序集变量 密码2, 文本型
.程序集变量 是否开机运行, 整数型, , , 0为否,1为是
.程序集变量 设置的密码, 文本型

.子程序 _设置窗口_创建完毕

设置的密码 = 取文本注册表项 (“SYSTEMSET”, “SET”, “PMM”, “”)
是否开机运行 = 取数值注册表项 (“SYSTEMSET”, “SET”, “BEGIN”, 0)
密码编辑框1.内容 = 设置的密码
密码编辑框2.内容 = 设置的密码
.如果 (是否隐藏窗口 = 1)
桌面选择框.选中 = 真
.否则
桌面选择框.选中 = 假
.如果结束
.如果 (是否开机运行 = 1)
运行选择框.选中 = 真
.否则
运行选择框.选中 = 假
.如果结束

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

密码1 = 密码编辑框1.内容

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

密码2 = 密码编辑框2.内容

.子程序 _桌面选择框_被单击

.如果 (是否隐藏窗口 = 0)
桌面选择框.选中 = 真
是否隐藏窗口 = 1
.否则
桌面选择框.选中 = 假
是否隐藏窗口 = 0
.如果结束

.子程序 _运行选择框_被单击

.如果 (是否开机运行 = 0)
运行选择框.选中 = 真
是否开机运行 = 1
.否则
运行选择框.选中 = 假
是否开机运行 = 0
.如果结束

.子程序 _保存按钮_被单击

.如果 (密码1 = 密码2)
写注册表项 (“SYSTEMSET”, “SET”, “PMM”, 密码1)
写注册表项 (“SYSTEMSET”, “SET”, “DESK”, 是否隐藏窗口)
写注册表项 (“SYSTEMSET”, “SET”, “BEGIN”, 是否开机运行)
.如果 (是否开机运行 = 1)
写注册项 (4, “SOFTWARE\Microsoft\Windows\CurrentVersion\Run\systemkey”, 取运行目录 () + “\” + 取执行文件名 ())
.否则
删除注册项 (4, “SOFTWARE\Microsoft\Windows\CurrentVersion\Run\systemkey”)
.如果结束
销毁 ()
.否则
信息框 (“确认密码不符!”, #警告图标, “密码错误!”)
密码编辑框2.获取焦点 ()
.如果结束

.子程序 _取消按钮_被单击

销毁 ()

.版本 2

.数据类型 矩形区域
.成员 Left, 整数型
.成员 Top, 整数型
.成员 Right, 整数型
.成员 Bottom, 整数型

Ⅳ 易语言做挂机锁怎么屏蔽所有热键

.版本 2
.支持库 eAPI.子程序 _时钟1_周期事件终止进程 (“taskmgr.exe”)
吧周期设成10谢谢

Ⅵ C#编写的挂机锁代码

C# 挂机锁 可以用hook(钩子)去做 监听键盘的按键 并且kill任务管理器的进程 钩子具体实现需要委托。网上有挂机锁的源码。 追问: 都不可以用 回答: using System; using System.Windows.Forms; using System.Text; using System.Runtime.InteropServices; using System.Reflection; using System.IO; namespace HookLock { public class Hook { #region 私有变量 /// <summary> /// 键盘钩子句柄 /// </summary> private IntPtr m_pKeyboardHook = IntPtr.Zero; /// <summary> /// 钩子委托声明 /// </summary> /// <param name="nCode"></param> /// <param name="wParam"></param> /// <param name="lParam"></param> /// <returns></returns> public delegate int HookProc(int nCode, Int32 wParam, IntPtr lParam); /// <summary> /// 键盘钩子委托实例 /// </summary> /// <remarks> /// 不要试图省略此变量,否则将会导致 /// 激活 CallbackOnCollectedDelegate 托管调试助手 (MDA)。 /// 详细请参见MSDN中关于 CallbackOnCollectedDelegate 的描述 /// </remarks> private HookProc m_KeyboardHookProcere; // 底层键盘钩子 public const int idHook = 13; /// <summary> /// 安装钩子 /// </summary> /// <param name="idHook"></param> /// <param name="lpfn"></param> /// <param name="hInstance"></param> /// <param name="threadId"></param> /// <returns></returns> [DllImport("user32.dll", CallingConvention = CallingConvention.StdCall)] public static extern IntPtr SetWindowsHookEx(int idHook, HookProc lpfn, IntPtr pInstance, int threadId); /// <summary> /// 卸载钩子 /// </summary> /// <param name="idHook"></param> /// <returns></returns> [DllImport("user32.dll", CallingConvention = CallingConvention.StdCall)] public static extern bool UnhookWindowsHookEx(IntPtr pHookHandle); /// <summary> /// 传递钩子 /// </summary> /// <param name="pHookHandle">是您自己的钩子函数的句柄。用该句柄可以遍历钩子链</param> /// <param name="nCode">把传入的参数简单传给CallNextHookEx即可</param> /// <param name="wParam">把传入的参数简单传给CallNextHookEx即可</param> /// <param name="lParam"></param> /// <returns></returns> [DllImport("user32.dll", CallingConvention = CallingConvention.StdCall)] public static extern int CallNextHookEx(IntPtr pHookHandle, int nCode, Int32 wParam, IntPtr lParam); #endregion 私有变量 #region 私有方法 /// <summary> /// 键盘钩子处理函数 /// </summary> /// <param name="nCode"></param> /// <param name="wParam"></param> /// <param name="lParam"></param> /// <returns></returns> /// <remarks>此版本的键盘事件处理不是很好,还有待修正.</remarks> private int KeyboardHookProc(int nCode, Int32 wParam, IntPtr lParam) { //return 1; KeyMSG m = (KeyMSG)Marshal.PtrToStructure(lParam, typeof(KeyMSG)); if (m_pKeyboardHook != IntPtr.Zero) { switch (((Keys)m.vkCode)) { case Keys.LWin: case Keys.RWin: case Keys.Delete: case Keys.Alt: case Keys.Escape: case Keys.F4: case Keys.Control: case Keys.Tab: return 1; } } return 0; } #endregion 私有方法 #region 公共方法 /// <summary> /// 安装钩子 /// </summary> /// <returns></returns> public bool InstallHook() { //IntPtr pInstance = Marshal.GetHINSTANCE(Assembly.GetExecutingAssembly().ManifestMole); IntPtr pInstance = (IntPtr)4194304; if (this.m_pKeyboardHook == IntPtr.Zero) { this.m_KeyboardHookProcere = new HookProc(KeyboardHookProc); this.m_pKeyboardHook = SetWindowsHookEx(idHook, m_KeyboardHookProcere, pInstance, 0); if (this.m_pKeyboardHook == IntPtr.Zero) { this.UnInstallHook(); return false; } } return true; } /// <summary> /// 卸载钩子 /// </summary> /// <returns></returns> public bool UnInstallHook() { bool result = true; if (this.m_pKeyboardHook != IntPtr.Zero) { result = (UnhookWindowsHookEx(this.m_pKeyboardHook) && result); this.m_pKeyboardHook = IntPtr.Zero; } return result; } [StructLayout(LayoutKind.Sequential)] public struct KeyMSG { public int vkCode; public int scanCode; public int flags; public int time; public int dwExtraInfo; } #endregion 公共方法 } } 这个就是核心的代码 追问: 我有Hook代码,就是不行 回答: 632959910 你加我

采纳哦

Ⅶ 易语言做挂机锁!

易语言屏幕锁源码下载地址:http://www.941wmsf.com/downinfo/222.html更多易语言源码,模块,软件请访问:www.941wmsf.com

Ⅷ 易语言锁键盘源码

.版本 2
.支持库 EdirectX

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

输入设备1.初始化 (取窗口句柄 ())

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

输入设备1.置键盘独占 (真)

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

输入设备1.置键盘独占 (假)

自己创个输入设备 望采纳!!!!!

Ⅸ VC 编写挂机锁

你如果要想屏蔽Ctrl+Alt+Del,靠全局键盘钩子是行不通的。

因为系统在启动时,winlogon.exe这个进程会注册Ctrl+Alt+Del这个热键,他会在一切程序之前截获这个WM_HOTKEY消息,使winlogon成为第一个处理它的程序。

所以要想屏蔽Ctrl+Alt+Del,可以写一个dll,注入到winlogon.exe这个进程中,dll被注入后,查找名为"SAS Window"的窗口,找到后子类化然后自己处理WM_HOTKEY消息,如果是Ctrl+Alt+Del,就干掉这个消息。其他系统热键你都可以在这里处理~~

这里有基本结构的代码http://hi..com/sunlightmoon/blog/item/a0aaade71963a729b8382065.html

这个至少在xp下是没问题的,vista下我没试。

另外,如果你觉得这样屏蔽任务管理器太麻烦的话,更简单的方法是修改注册表[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System] 下找到"DisableTaskmgr",把dword值设置为00000000就可以了,程序退出时你再给改回来。

希望对你能有帮助~~

Ⅹ 求一个易语言挂机锁的源码 邮箱:[email protected]

.版本 2
.支持库 spec
.支持库 shellEx
.程序集 窗口程序集1
.程序集变量 zcrj
.程序集变量 密码, 文本型
.程序集变量 zcrj1, 整数型
.子程序 _标签1_反馈事件, 整数型
.参数 参数一, 整数型
.参数 参数二, 整数型
.判断开始 (参数一 = zcrj)
.判断开始 (编辑框1.内容 = 密码)
鼠标_解锁 ()
标签2.标题 = “鼠标已解锁,一秒后关闭”
延迟 (1500)
结束 ()
.默认
标签2.标题 = “密码输入错误!!”
.判断结束
.判断 (参数二 = zcrj1)
_启动窗口.总在最前 = 真
编辑框1.获取焦点 ()
.默认
' 标签2.标题 = “密码输入错误!!”
.判断结束
.子程序 _标签3_鼠标左键被放开, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
密码 = 编辑框1.内容
鼠标_锁定 ()
标签2.标题 = “鼠标已锁定,请输入密码,按h..m键”
编辑框1.内容 = “”
编辑框1.获取焦点 ()
.子程序 __启动窗口_创建完毕
zcrj = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, 36)
zcrj1 = 注册热键 (_启动窗口.取窗口句柄 (), 标签1.取窗口句柄 (), 0, 35)

这个是输入密码之后,按自己设置的热键解锁,需要精易模块

热点内容
选择ftp服务器 发布:2024-10-10 04:56:16 浏览:197
php函数fopen 发布:2024-10-10 04:50:20 浏览:238
编程飞鸟站 发布:2024-10-10 04:49:34 浏览:615
数据库基础与应用作业 发布:2024-10-10 04:35:31 浏览:847
淘宝上传图片找同款 发布:2024-10-10 04:31:23 浏览:435
玩具直播脚本 发布:2024-10-10 04:31:19 浏览:629
php后门检测工具 发布:2024-10-10 04:18:46 浏览:275
我的世界怎么把服务器封面更改 发布:2024-10-10 04:18:35 浏览:930
linuxsvnserver 发布:2024-10-10 03:56:51 浏览:544
php数组最大长度 发布:2024-10-10 03:41:22 浏览:679