超级列表框读写实现的账号管理功能

易语言 2020-02-27 22:26:46

超级列表框读写实现的账号管理功能

.如果真 (超级列表框1.现行选中项 = -1)
返回 ()
' 没有选择表项时,不执行任何操作.
.如果真结束
超级列表框1.获取焦点 ()
文件位置 = 超级列表框1.现行选中项
超级列表框1.删除表项 (文件位置)
超级列表框1.现行选中项 = 文件位置
超级列表框1.保证显示 (文件位置)
删除文件 (取运行目录 () + “\账号保存.ini”)
写配置项 (取运行目录 () + “\账号保存.ini”, “新建账号资料”, “创建日期:”, 到文本 (取现行时间 ()))
索引_1 = 超级列表框1.取表项数 ()
写配置项 (取运行目录 () + “\账号保存.ini”, “条数管理”, “条数”, 到文本 (索引_1))
索引 = 超级列表框1.取表项数 ()
计次 = 1
.计次循环首 (索引, 计次)
写配置项 (取运行目录 () + “\账号保存.ini”, 到文本 (计次), “序号:”, 超级列表框1.取标题 (计次 - 1, 0))
写配置项 (取运行目录 () + “\账号保存.ini”, 到文本 (计次), “账号:”, 超级列表框1.取标题 (计次 - 1, 1))
写配置项 (取运行目录 () + “\账号保存.ini”, 到文本 (计次), “密码:”, 超级列表框1.取标题 (计次 - 1, 2))
写配置项 (取运行目录 () + “\账号保存.ini”, 到文本 (计次), “游戏区:”, 超级列表框1.取标题 (计次 - 1, 3))
调试输出 (计次)
.计次循环尾 ()