【纯源码】超级列表框保存勾选和读取勾选

御风软件

纯源码，利用配置项，实现多超级列表框的勾选保存和读取
保存勾选.zip (1.49 KB, 下载次数: 234)

2014-9-29 00:26 上传

点击文件名下载附件
下载积分: 精币 -2 枚

这里是附件，下面的是实现代码
易代码显示有问题，选择纯文本模式，再复制代码就可以了

  

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

变量名	类 型	静态	数组	备 注
N	整数型
表项索引	整数型
勾选表项	文本型

计次循环首 (超级列表框1.取表项数 (), N)
表项索引 ＝ N － 1
如果真 (超级列表框1.取当前状态图片 (表项索引) ＝ 1)
勾选表项 ＝ 勾选表项 ＋ 到文本 (表项索引) ＋ “,”

计次循环尾 ()
勾选表项 ＝ 取文本左边 (勾选表项, 取文本长度 (勾选表项) － 1)
如果真 (勾选表项 ≠ “”)
写配置项 (取运行目录 () ＋ “\勾选表项.ini”, “列表勾选”, “勾选表项”, 勾选表项)

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

变量名	类 型	静态	数组	备 注
N	整数型
索引数组	文本型		0
勾选表项	文本型

勾选表项 ＝ 读配置项 (取运行目录 () ＋ “\勾选表项.ini”, “列表勾选”, “勾选表项”, )
如果真 (勾选表项 ≠ “”)
索引数组 ＝ 分割文本 (勾选表项, “,”, )
计次循环首 (取数组成员数 (索引数组), N)
超级列表框1.置状态图片 (到整数 (索引数组 [N]), 1)
计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 N, 整数型<br /> .局部变量 表项索引, 整数型<br /> .局部变量 勾选表项, 文本型<br /> <br /> .计次循环首 (超级列表框1.取表项数 (), N)<br />     表项索引 ＝ N － 1<br />     .如果真 (超级列表框1.取当前状态图片 (表项索引) ＝ 1)<br />         勾选表项 ＝ 勾选表项 ＋ 到文本 (表项索引) ＋ “,”<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 勾选表项 ＝ 取文本左边 (勾选表项, 取文本长度 (勾选表项) － 1)<br /> .如果真 (勾选表项 ≠ “”)<br />     写配置项 (取运行目录 () ＋ “\勾选表项.ini”, “列表勾选”, “勾选表项”, 勾选表项)<br /> .如果真结束<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 N, 整数型<br /> .局部变量 索引数组, 文本型, , "0"<br /> .局部变量 勾选表项, 文本型<br /> <br /> 勾选表项 ＝ 读配置项 (取运行目录 () ＋ “\勾选表项.ini”, “列表勾选”, “勾选表项”, )<br /> .如果真 (勾选表项 ≠ “”)<br />     索引数组 ＝ 分割文本 (勾选表项, “,”, )<br />     .计次循环首 (取数组成员数 (索引数组), N)<br />         超级列表框1.置状态图片 (到整数 (索引数组 [N]), 1)<br />     .计次循环尾 ()<br /> .如果真结束

pxianwei

用到了配置项 不错

gdxinda

来学习一下

晚熟

谢谢大佬分享

lm88818

感谢分享！

xiaoxiao2

感谢分享

Duffy

感谢分享！

lxh1230

6666666666666666666666

ngrjsc

只能保存，编号，，不完整

taoxian

不错不错不错