觅风论坛

标题: 新人求邀请码，觅风第2课教学程序优化 [打印本页]

作者: 第八天 时间: 2020-10-7 01:42
标题: 新人求邀请码，觅风第2课教学程序优化
邀请码接受邮箱：729036325@qq.com

教程介绍：主要结合觅风教学的内容，对第2课的QQ登陆程序教学进行优化：
1. 增加了“记住账号”功能，即当用户登陆成功后，程序会自动记录当前登陆账号，再次登陆便可以直接进行选择，不用输入账号；
2. 增加了“记住密码”功能，即当用户点击了“记住密码”且登陆成功后，程序会自动记录该账号对应的密码，再次登陆时，直接选择账号，密码会对应自动出现，不用再次输入；
3. 增加了“QQ程序图标”，即通过ICO图获取的程序，提取了QQ的图标加入到此程序中；
4. 增加了“注册账号”功能，即当用户点击“注册向导”按钮时，程序会通过超链接浏览到注册QQ号的网址页面；
5. 增加了“回车键登陆”，即当用户输入完账号密码后，可以直接按回车键进行登陆，不用点击“登陆”按钮。

以下为程序截图：登陆程序.png

以下为程序的文本代码：

.程序集窗口程序集_启动窗口

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

组合框1.获取焦点 ()

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

.如果真 (组合框1.内容＝ “”)
信息框 (“请输入账号”, 0, , )
组合框1.获取焦点 ()
返回 ()
.如果真结束
.如果真 (编辑框2.内容＝ “”)
信息框 (“请输入密码”, 0, , )
编辑框2.获取焦点 ()
返回 ()
.如果真结束
.如果真 (组合框1.内容＝ “123456” 且编辑框2.内容 ≠ “654321”)
信息框 (“密码错误”, 0, , )
编辑框2.获取焦点 ()
返回 ()
.如果真结束
.如果真 (编辑框2.内容＝ “654321” 且组合框1.内容 ≠ “123456”)
信息框 (“账号错误”, 0, , )
组合框1.获取焦点 ()
返回 ()
.如果真结束
.如果 (编辑框2.内容＝ “654321” 且组合框1.内容＝ “123456”)
信息框 (“登陆成功”, 0, , )
组合框1.加入项目 (组合框1.内容, )
.判断开始 (选择框1.选中＝真)
写配置项 (取运行目录 () ＋ “\QQ登陆界面密码保存.ini”, “记住密码”, 组合框1.内容, 编辑框2.内容)
信息框 (“密码保存成功”, 0, , )
.默认

.判断结束

.否则
信息框 (“账号或密码错误”, 0, , )
.如果结束

.子程序 _组合框1_列表项被选择

.判断开始 (组合框1.现行选中项＝ 0)
编辑框2.内容＝读配置项 (取运行目录 () ＋ “\QQ登陆界面密码保存.ini”, “记住密码”, 组合框1.内容, )
.默认

.判断结束

.子程序 _编辑框2_按下某键, 逻辑型
.参数键代码, 整数型
.参数功能键状态, 整数型

.如果真 (键代码＝ #回车键)
_按钮1_被单击 ()
.如果真结束

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

删除文件 (取运行目录 () ＋ “\QQ登陆界面密码保存.ini”)
销毁 ()

欢迎光临觅风论坛 (https://www.eyyba.com/)