|

分享源码
界面截图: |
|
是否带模块: |
纯源码 |
备注说明: |
- |
窗口程序集名 | 保 留 | 保 留 | 备 注 | 启动窗口程序集 | | | | 变量名 | 类 型 | 数组 | 备 注 | f1 | 整数型 | | f2 | 整数型 | | 密码 | 文本型 | | f3 | 整数型 | | f4 | 整数型 | | XP风格 (2 ) 如果真 (注册项是否存在 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\time”))  次数 = 取数值注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\time”, ) 如果 (取小时 (取现行时间 ()) - 次数 < 2 ) 信息框 (“由于密码错误!您被限制登陆2小时!”, 0, )  _启动窗口. 销毁 () 删除注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\time”)  如果真 (注册项是否存在 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\jzdmm”))  透明标签1.标记 = 取文本注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\jzdmm”, ) 密码编辑框.内容 = 透明标签1.标记  密码选择框.选中 = 真  媒体播放1. 打开 (取运行目录 () + “\mp3\明天会更好.mp3”)媒体播放1. 播放 (-1, _启动窗口. 取窗口句柄 ()) f1 = 注册热键 (_启动窗口. 取窗口句柄 (), 标签1. 取窗口句柄 (), 0, #F1键 )f2 = 注册热键 (_启动窗口. 取窗口句柄 (), 标签1. 取窗口句柄 (), 0, #F2键 )f3 = 注册热键 (_启动窗口. 取窗口句柄 (), 标签1. 取窗口句柄 (), 0, #F3键 )f4 = 注册热键 (_启动窗口. 取窗口句柄 (), 标签1. 取窗口句柄 (), 0, #F4键 ) 如果 (注册项是否存在 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\sum”))  次数 = 取数值注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\sum”, ) 透明标签2.标题 = “欢迎您第” + 到文本 (次数 ) + “次使用本系统!” 写注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\sum”, 次数 + 1 ) 写注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\sum”, 1 ) 写注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\mm”, “caoyutan”) 信息框 (“欢迎您首次使用本系统!” + #换行符 + “请进行初始设置!”, 0, ) 密码 = 取文本注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\mm”, )|
_标签1_反馈事件 | 整数型 | | |
参数一 | 整数型 | | | | 参数二 | 整数型 | | | |
如果真 (参数一 = f1 ) 信息框 (“默认登陆密码:caoyutan” + #换行符 + “登陆后请修改密码,切记!切记!” + #换行符 + “密码错误3次,将限制登陆2小时!” + #换行符 + “正确登陆后可自动消除限制!” + #换行符 + “f2键音乐开关!” + #换行符 + “f3,f4 音量增减!”, 0, ) 如果真 (参数一 = f2 ) 如果 (登陆按钮.标记 = “暂停”)  登陆按钮.标记 = “播放”  媒体播放1. 暂停 ()  登陆按钮.标记 = “暂停”  媒体播放1. 播放 (1000, )   如果真 (参数一 = f3 ) 媒体播放1. 取音量 (左音, 右音 ) 媒体播放1. 置音量 (左音 + 15, 右音 + 15 ) 如果真 (参数一 = f4 ) 媒体播放1. 取音量 (左音, 右音 ) 如果真 (媒体播放1. 置音量 (左音 - 15, 右音 - 15 ))     变量名 | 类 型 | 静态 | 数组 | 备 注 | 重试次数 | 短整数型 | | | 小时 | 短整数型 | | |
重试次数 = 重试次数 + 1 如果真 (密码编辑框.内容 ≠ 密码 ) 如果 (3 - 重试次数 = -1 ) 信息框 (“由于密码错误!您已被限时登陆2小时!”, 0, )  小时 = 取小时 (取现行时间 ())  写注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\time”, 小时 )  _启动窗口. 销毁 () 信息框 (“密码错误,您还有” + 到文本 (3 - 重试次数 ) + “次机会!”, 0, ) 返回 ()   _启动窗口.可视 = 假 媒体播放1. 关闭 ()载入 (系统窗口, , 真)|
_密码编辑框_按下某键 | 逻辑型 | | |
键代码 | 整数型 | | | | 功能键状态 | 整数型 | | | |
如果真 (键代码 = #回车键 ) 如果真 (密码编辑框.内容 = “”) 信息框 (“请输入正确的密码!”, 0, )  密码编辑框. 获取焦点 () 返回 ()  _登陆按钮_被单击 () 如果真 (密码编辑框.内容 = “”) 信息框 (“请输入正确的密码!”, 0, ) 密码编辑框. 获取焦点 () 密码选择框.选中 = 假 返回 () 如果 (密码选择框.选中 = 真) 写注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\jzdmm”, 密码编辑框.内容 ) 密码编辑框. 获取焦点 () 删除注册项 ( #现行用户, “Software\Microsoft\Windows\hyjx\xsgl\jzdmm”) 密码编辑框.内容 = “”
|
-
-
管理系统.rar
763.79 KB, 下载次数: 11, 下载积分: 精币 -2 枚
|