| 子程序名 | 返回值类型 | 公开 | 备 注 | ||
| 导入账号3 | |||||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| t | 整数型 | |||||
| a | 文本型 | |||||
| b | 文本型 | 0 | ||||
| c | 整数型 | |||||
| d | 文本型 | 0 | ||||
| text | 文本型 | |||||
| f | 整数型 | |||||
| txt | 文本型 | |||||
| arr | 文本型 | 0 | ||||
| n | 整数型 | |||||
通用对话框1.类型 ＝ 0
通用对话框1.过滤器 ＝ “txt文件|*.txt”
如果真 (通用对话框1.文件名 ＝ “”)
信息框 (“请选择账号文件”, 0, , )返回 ()a ＝ 通用对话框1.文件名
' a ＝ Dialog_.OpenFile (取窗口句柄 (), 取运行目录 (), “请选择账号文件”, “txt文件|*.txt”, 真)
如果真 (a ＝ “”)返回 ()
t ＝ 取启动时间 ()
txt ＝ 到文本 (读入文件 (a))
arr ＝ 分割文本 (a, #换行符, n)
hx.全部删除 ()
hx.置表项数 (n)
hx.事件_填充表项 (&事件_填充表项)
状态条1.置文本 (1, “读取所用时间：” ＋ 到文本 (取整 ( (取启动时间 () － t) ÷ 1000)) ＋ “秒”)
' 返回 ()
| 子程序名 | 返回值类型 | 公开 | 备 注 | ||||
| 事件_填充表项 | |||||||
| 参数名 | 类 型 | 参考 | 可空 | 数组 | 备 注 | ||
| 项目指针 | 整数型 | 标题指针 | 整数型 | arr | 文本型 | ||
| 变量名 | 类 型 | 静态 | 数组 | 备 注 | ||
| 超级列表框项目 | 超级列表框项目 | |||||
| user | 文本型 | |||||
| pwd | 文本型 | |||||
user ＝ 文本_取左边 (arr [超级列表框项目.表项索引 ＋ 1], “----”)
pwd ＝ 文本_取左边 (arr [超级列表框项目.表项索引 ＋ 1], “----”)
如果真 (超级列表框项目.子项索引 ＝ 0)写到内存 (到文本 (超级列表框项目.表项索引 ＋ 1), 标题指针, )
如果真 (超级列表框项目.子项索引 ＝ 1)写到内存 (user, 标题指针, )如果真 (超级列表框项目.子项索引 ＝ 2)写到内存 (pwd, 标题指针, )| i支持库列表 | 支持库注释 |
| iext | 扩展界面支持库一 |