易语言如何写挂机锁

答案:2 悬赏:40 手机版

解决时间 2021-01-26 05:42

提问者网友：心如荒岛囚我终老
2021-01-25 20:24

如题易语言如何写挂机锁？

最佳答案

五星知识达人网友：三千妖杀
2021-01-25 21:31

简单的一句代码：首先先创建1个窗口1 然后在启动窗口建立1个编辑框和1个按钮双击按钮写代码如果（编辑框1.内容<>“密码”）信息框（“密码错误！”）否则载入（窗口1）希望采纳！呵呵

求采纳

全部回答

1楼网友：归鹤鸣
2021-01-25 22:39

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

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息