导读
易语言5.6完美版,可静态编译,绿色无后门

学习易语言 讲究的是系统,如果你正在四处闲逛,你懂的永远是皮毛! 觅风论坛正在为每个困惑的对易语言 详细

[教程] 新人求邀请码,觅风第2课教学程序优化

[复制链接]

微信扫一扫 分享朋友圈

匿名  发表于 2020-10-7 01:42:45 |阅读模式 打印 上一主题 下一主题

马上注册,结交更多易友,享用更多功能,让你轻松玩转觅风论坛。

您需要 登录 才可以下载或查看,没有账号?立即注册

x
邀请码接受邮箱:729036325@qq.com


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


以下为程序截图: 登陆程序.png 记住密码功能.png
代码1.png 代码2.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”)
销毁 ()



回复

使用道具

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

关注我们:觅风论坛与你快乐分享

收藏本站

用心服务做个非盈利公益编程网站

www.eyyba.com

服务人:觅风论坛

Email:eyyba@foxmail.com

Powered by WWW.EYYBA.COM X3.4© 2001-2023 Inc.   版权所有   

觅风论坛  疆ICP备15020893号-1