.版本 2
.支持库 iext
.程序集 窗口程序集1
.子程序 _按钮1_被单击
.局部变量 临时数据, 文本型
.局部变量 临时数组, 文本型, , "0"
.局部变量 循环次数, 整数型
.局部变量 n, 整数型
.局部变量 再次分割, 文本型, , "0"
.局部变量 索引, 整数型
临时数据 ＝ 到文本 (读入文件 (取运行目录 () ＋ “\1212.ini”))
临时数组 ＝ 分割文本 (临时数据, #换行符, )
循环次数 ＝ 取数组成员数 (临时数组)
超级列表框1.全部删除 ()
.计次循环首 (循环次数, n)
再次分割 ＝ 分割文本 (临时数组 [n], “|”, )
索引 ＝ 超级列表框1.插入表项 (-1, , , , , )
超级列表框1.置标题 (索引, 0, 再次分割 [1])
超级列表框1.置标题 (索引, 1, 再次分割 [2])
超级列表框1.置标题 (索引, 2, 再次分割 [3])
.计次循环尾 ()
.子程序 _按钮2_被单击
.局部变量 循环次数, 整数型
.局部变量 n, 整数型
.局部变量 临时数据, 文本型
.局部变量 最终数据, 字节集
循环次数 ＝ 超级列表框1.取表项数 ()
临时数据 ＝ “”
.计次循环首 (循环次数, n)
临时数据 ＝ 临时数据 ＋ 超级列表框1.取标题 (n － 1, 0) ＋ “|” ＋ 超级列表框1.取标题 (n － 1, 1) ＋ “|” ＋ 超级列表框1.取标题 (n － 1, 2) ＋ “|” ＋ #换行符
.计次循环尾 ()
最终数据 ＝ 到字节集 (临时数据)
.判断开始 (写到文件 (取运行目录 () ＋ “\1212.ini”, 最终数据) ＝ 真)
信息框 (“保存成功！”, 0, )
.默认
信息框 (“保存失败！”, #错误图标, )
.判断结束
.子程序 _按钮3_被单击
.局部变量 行数
行数 ＝ 到整数 (超级列表框1.取表项数 ())
超级列表框1.插入表项 (, 到文本 (行数 ＋ 1), , , , )
' 超级列表框1.置标题 (行数, 0, 到文本 (行数))
超级列表框1.置标题 (行数, 1, 编辑框1.内容)
超级列表框1.置标题 (行数, 2, 编辑框2.内容)
