易语言超级列表框如何自动读取和保存所有内容到ini文件
.版本2.支持库iext.子程序__启动窗口_创建完毕.局部变量计次,整数型.局部变量表项,整数型.计次循环首(表项,计次)表项=超级列表框1.插入表项(,读配置项(取运...
.版本 2
.支持库 iext
.子程序 __启动窗口_创建完毕
.局部变量 计次, 整数型
.局部变量 表项, 整数型
.计次循环首 (表项, 计次)
表项 = 超级列表框1.插入表项 (, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “A”, ), , , , )
超级列表框1.置标题 (表项, 2, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “B”, ))
超级列表框1.置标题 (表项, 3, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “C”, ))
超级列表框1.置标题 (表项, 4, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “D”, ))
.计次循环尾 ()
.子程序 __启动窗口_将被销毁
.局部变量 计次, 整数型
.局部变量 索引, 整数型
索引 = 超级列表框1.取表项数 ()
.计次循环首 (索引, 计次)
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “A”, 超级列表框1.取标题 (计次 - 1, 1))
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “B”, 超级列表框1.取标题 (计次 - 1, 2))
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “C”, 超级列表框1.取标题 (计次 - 1, 3))
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “D”, 超级列表框1.取标题 (计次 - 1, 4))
.计次循环尾 ()
这是已经写了的,菜鸟求教啊! 展开
.支持库 iext
.子程序 __启动窗口_创建完毕
.局部变量 计次, 整数型
.局部变量 表项, 整数型
.计次循环首 (表项, 计次)
表项 = 超级列表框1.插入表项 (, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “A”, ), , , , )
超级列表框1.置标题 (表项, 2, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “B”, ))
超级列表框1.置标题 (表项, 3, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “C”, ))
超级列表框1.置标题 (表项, 4, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “D”, ))
.计次循环尾 ()
.子程序 __启动窗口_将被销毁
.局部变量 计次, 整数型
.局部变量 索引, 整数型
索引 = 超级列表框1.取表项数 ()
.计次循环首 (索引, 计次)
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “A”, 超级列表框1.取标题 (计次 - 1, 1))
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “B”, 超级列表框1.取标题 (计次 - 1, 2))
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “C”, 超级列表框1.取标题 (计次 - 1, 3))
写配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “D”, 超级列表框1.取标题 (计次 - 1, 4))
.计次循环尾 ()
这是已经写了的,菜鸟求教啊! 展开
4个回答
展开全部
计次循环首 (表项, 计次)
表项 = 超级列表框1.插入表项 (, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “A”, ), , , , )
超级列表框1.置标题 (表项, 2, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “B”, ))
超级列表框1.置标题 (表项, 3, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “C”, ))
超级列表框1.置标题 (表项, 4, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “D”, ))
.计次循环尾 ()
几次循环改为判断循环就可以了
.版本 2
.支持库 iext
.版本 2
.局部变量 i, 整数型
局部变量 索引, 整数型
i = 1
.判断循环首 (读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “A”, ) ≠ “”)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “A”, ))
超级列表框1.置标题 (索引, 1, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “B”, ))
超级列表框1.置标题 (索引, 2, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “C”, ))
超级列表框1.置标题 (索引, 3, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “D”, ))
超级列表框1.置标题 (索引, 4, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “E”, ))
超级列表框1.置标题 (索引, 5, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “F”, ))
i = i + 1
.判断循环尾 ()
表项 = 超级列表框1.插入表项 (, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “A”, ), , , , )
超级列表框1.置标题 (表项, 2, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “B”, ))
超级列表框1.置标题 (表项, 3, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “C”, ))
超级列表框1.置标题 (表项, 4, 读配置项 (取运行目录 () + “\保存.ini”, 到文本 (计次), “D”, ))
.计次循环尾 ()
几次循环改为判断循环就可以了
.版本 2
.支持库 iext
.版本 2
.局部变量 i, 整数型
局部变量 索引, 整数型
i = 1
.判断循环首 (读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “A”, ) ≠ “”)
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “A”, ))
超级列表框1.置标题 (索引, 1, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “B”, ))
超级列表框1.置标题 (索引, 2, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “C”, ))
超级列表框1.置标题 (索引, 3, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “D”, ))
超级列表框1.置标题 (索引, 4, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “E”, ))
超级列表框1.置标题 (索引, 5, 读配置项 (取运行目录 () + “/配置文件.ini”, 到文本 (i), “F”, ))
i = i + 1
.判断循环尾 ()
展开全部
追问
我写的这个如果把读配置项的.计次循环首 (表项, 计次)中的(表项)改为数值可以的,只是的这个(表项)不知道可以怎么填,填100数值就可以读取100组数值,但是在配置项只有20组数值的时候还是会有100组其他是空白
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你这个已经完了啊,还要做什么?
追问
读取不了能正常保存
追答
哦,,,我明白你的意思了。
你这样,,,添加多一条配置信息,就是保存条数的,
写配置项(目录,“条数管理”,“条数”,超级列表框..取表项数 ())
-----------------------------------------------
然后再读取
n = 到数值 (读配置项 (目录, “条数管理”, “条数”, ))
计次循环首(n,)
-----------
这里就是你读取的内容,到超级列表框
--------
计次循环尾
我是这样么做的,这样就能准确读取数据条数!
请采纳
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
敢问超级列表框的布局是咋样的。。
追问
报表列ABCDE,表项12345
追答
新变量:num
计次循环首(超级列表框1.取表项数(),num)
写配置项("C:\配置文件.ini","超级列表框","1",超级列表框1.取标题(num-1,0))
写配置项("C:\配置文件.ini","超级列表框","2",超级列表框1.取标题(num-1,1))
写配置项("C:\配置文件.ini","超级列表框","3",超级列表框1.取标题(num-1,2))
写配置项("C:\配置文件.ini","超级列表框","4",超级列表框1.取标题(num-1,3))
计次循环尾()
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询