Question

易语言超级列表框怎么保存文本 和导入文本

跪求 易语言超级列表框怎么保存文本 和导入文本 当按钮2被单击 保存超级列表框1的文本 按钮2被单击导入保存的文本怎么写
易语言超级列表框怎么保存文本 和导入文本 当按钮2被单击 保存超级列表框1的文本 按钮3被单击导入保存的文本怎么写

Answer 1

.版本 2
.支持库 iext
.支持库 Krnlnex

.程序集 窗口程序集1

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

.判断开始 (文件是否存在 (取运行目录 () ＋ “/1.txt”) ＝ 假)
    写到文件 (取运行目录 () ＋ “/1.txt”, #文本)
.默认

.判断结束

.子程序 _按钮1_被单击
.局部变量 文本, 文本型, , "0"
.局部变量 文件, 文本型
.局部变量 l, 整数型
.局部变量 B, 整数型

超级列表框1.全部删除 ()
文件 ＝ 到文本 (读入文件 (取运行目录 () ＋ “/1.txt”))
调试输出 (文件)
文本 ＝ 分割文本 (文件, #换行符, )
调试输出 (文本)
.计次循环首 (取数组成员数 (文本), l)
    B ＝ 超级列表框1.插入表项 (, , , , , )
    超级列表框1.置标题 (B, 0, 到文本 (l))
    超级列表框1.置标题 (B, 1, 文本 [l])
.计次循环尾 ()

.子程序 _按钮3_被单击
.局部变量 B, 整数型
.局部变量 L, 整数型

.如果真 (编辑框1.内容 ≠ “”)
    B ＝ 超级列表框1.取表项数 ()
    L ＝ 超级列表框1.插入表项 (, , , , , )
    超级列表框1.置标题 (L － 1, 0, 到文本 (B ＋ 1))
    超级列表框1.置标题 (L － 1, 1, 编辑框1.内容)
    编辑框1.内容 ＝ “”
.如果真结束

.子程序 _按钮2_被单击
.局部变量 内容, 文本型, , "0"
.局部变量 最后内容, 文本型
.局部变量 L, 整数型

.计次循环首 (超级列表框1.取表项数 (), L)
    加入成员 (内容, 超级列表框1.取标题 (L － 1, 1))
.计次循环尾 ()
L ＝ 0
.计次循环首 (取数组成员数 (内容), L)
    .如果 (L ＝ 取数组成员数 (内容))
        最后内容 ＝ 最后内容 ＋ 内容 [L]
    .否则
        最后内容 ＝ 最后内容 ＋ 内容 [L] ＋ #换行符
    .如果结束

.计次循环尾 ()
写到文件 (取运行目录 () ＋ “/1.txt”, 到字节集 (最后内容))