超级列表框 是否有检查框 保存配置与读取配置

zhaogr4778

超级列表框  是否有检查框 保存配置  读取配置
帮我修改一下 谢谢了

lipzzzz

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
保存	文本型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

超级列读取 ()

子程序名	返回值类型	公开	备 注
超级列读取

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型
fg	文本型		0
fg2	文本型		0

超级列表框1.全部删除 ()
fg ＝ 分割文本 (编码_Utf8到Ansi (读入文件 (取运行目录 () ＋ “\config.ini”)), #换行符, )
计次循环首 (取数组成员数 (fg), i)
fg2 ＝ 分割文本 (fg [i], “|”, )
i ＝ 超级列表框1.插入表项 (, , , , , )
计次循环首 (取数组成员数 (fg2), j)
如果真 (j ＝ 1)
超级列表框1.置状态图片 (i, 到整数 (fg2 [j]))
超级列表框1.置标题 (i, j － 2, fg2 [j])
计次循环尾 ()
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮_保存_被单击

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型

保存 ＝ “”
计次循环首 (超级列表框1.取表项数 (), i)
保存 ＝ 保存 ＋ 到文本 (超级列表框1.取当前状态图片 (i － 1)) ＋ “|”
计次循环首 (3, j)
保存 ＝ 保存 ＋ 超级列表框1.取标题 (i － 1, j － 1) ＋ “|”
计次循环尾 ()
保存 ＝ 保存 ＋ #换行符
计次循环尾 ()
写到文件 (取运行目录 () ＋ “\config.ini”, 到字节集 (保存))

子程序名	返回值类型	公开	备 注
_按钮_导入账号_被单击

变量名	类 型	静态	数组	备 注
总文本	文本型
分割1	文本型		0
a	整数型
分割2	文本型		0
索引	整数型

通用对话框1.初始目录 ＝ 取运行目录 ()
如果真 (通用对话框1.打开 ())
超级列表框1.全部删除 ()
总文本 ＝ 到文本 (读入文件 (通用对话框1.文件名))
分割1 ＝ 分割文本 (总文本, #换行符, )
计次循环首 (取数组成员数 (分割1), a)
分割2 ＝ 分割文本 (分割1 [a], “|”, )
如果真 (取数组成员数 (分割2) ≥ 2)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))
超级列表框1.置标题 (索引, 1, 分割2 [1])
超级列表框1.置标题 (索引, 2, 分割2 [2])

计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 保存, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 超级列读取 ()<br /> <br /> .子程序 超级列读取<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 fg, 文本型, , "0"<br /> .局部变量 fg2, 文本型, , "0"<br /> <br /> 超级列表框1.全部删除 ()<br /> fg ＝ 分割文本 (编码_Utf8到Ansi (读入文件 (取运行目录 () ＋ “\config.ini”)), #换行符, )<br /> .计次循环首 (取数组成员数 (fg), i)<br />     fg2 ＝ 分割文本 (fg <i>, “|”, )<br />     i ＝ 超级列表框1.插入表项 (, , , , , )<br />     .计次循环首 (取数组成员数 (fg2), j)<br />         .如果真 (j ＝ 1)<br />             超级列表框1.置状态图片 (i, 到整数 (fg2 [j]))<br />         .如果真结束<br />         超级列表框1.置标题 (i, j － 2, fg2 [j])<br />     .计次循环尾 ()<br /> <br /> .计次循环尾 ()<br /> <br /> .子程序 _按钮_保存_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> <br /> 保存 ＝ “”<br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     保存 ＝ 保存 ＋ 到文本 (超级列表框1.取当前状态图片 (i － 1)) ＋ “|”<br />     .计次循环首 (3, j)<br />         保存 ＝ 保存 ＋ 超级列表框1.取标题 (i － 1, j － 1) ＋ “|”<br />     .计次循环尾 ()<br />     保存 ＝ 保存 ＋ #换行符<br /> .计次循环尾 ()<br /> 写到文件 (取运行目录 () ＋ “\config.ini”, 到字节集 (保存))<br /> <br /> .子程序 _按钮_导入账号_被单击<br /> .局部变量 总文本, 文本型<br /> .局部变量 分割1, 文本型, , "0"<br /> .局部变量 a, 整数型<br /> .局部变量 分割2, 文本型, , "0"<br /> .局部变量 索引, 整数型<br /> <br /> 通用对话框1.初始目录 ＝ 取运行目录 ()<br /> .如果真 (通用对话框1.打开 ())<br />     超级列表框1.全部删除 ()<br />     总文本 ＝ 到文本 (读入文件 (通用对话框1.文件名))<br />     分割1 ＝ 分割文本 (总文本, #换行符, )<br />     .计次循环首 (取数组成员数 (分割1), a)<br />         分割2 ＝ 分割文本 (分割1 [a], “|”, )<br />         .如果真 (取数组成员数 (分割2) ≥ 2)<br />             索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />             超级列表框1.置标题 (索引, 0, 到文本 (索引 ＋ 1))<br />             超级列表框1.置标题 (索引, 1, 分割2 [1])<br />             超级列表框1.置标题 (索引, 2, 分割2 [2])<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .如果真结束

补充内容 (2026-7-15 15:26):
用了精益模块

a2083657

超级列表框检查框状态读写用 取当前状态图片 和 置状态图片 就行。

保存例子：
```
子程序 保存检查框状态
参数 文件名 文本型
局部变量 i 整数型
局部变量 内容 文本型

内容 = ""
计次循环首 (超级列表框1.取表项数 (), i)
    内容 = 内容 + 到文本 (i - 1) + “|” + 到文本 (超级列表框1.取当前状态图片 (i - 1)) + #换行符
计次循环尾 ()
写到文件 (文件名, 到字节集 (内容))
```

读取例子：
```
子程序 读取检查框状态
参数 文件名 文本型
局部变量 文本 文本型
局部变量 行 文本型
局部变量 分割 文本型
局部变量 索引 整数型
局部变量 状态 整数型

文本 = 到文本 (读入文件 (文件名))
如果真 (文本 ≠ “”)
    行分割文本 (文本, #换行符, )
    计次循环首 (取数组成员数 (行), i)
        分割 = 分割文本 (行 [i], “|”)
        如果真 (取数组下标 (分割, ) ≥ 2)
            索引 = 到整数 (分割 [1])
            状态 = 到整数 (分割 [2])
            超级列表框1.置状态图片 (索引, 状态)
        如果真结束
    计次循环尾 ()
```

注意 取当前状态图片 返回的是状态图片索引，0是未勾选，1是勾选（默认），可以自己定义图片组。如果你的列表框用了别的图片组，按实际索引值处理。

文件路径自己传，比如取运行目录() + “\check.ini”。