精易论坛

标题: 超级列框打开和保存配置文件的实例 [打印本页]

作者: zhx200 时间: 2018-7-28 21:37
标题: 超级列框打开和保存配置文件的实例
1。用了“精易模块”，请在本论坛下。
2。结合了，精易模块中的“类_配置项”。
3。实现了，导入、导出保存功能。

.版本 2
.支持库 iext
.程序集窗口程序集_启动窗口
.子程序 __启动窗口_创建完毕
连续赋值 (取运行目录 (), 通用对话框1.初始目录, 通用对话框2.初始目录)
.子程序 _按钮_关闭_被单击
销毁 ()
.子程序 _按钮_导入_被单击
.局部变量 Go配置类, 类_配置项
.局部变量 i, 整数型
.局部变量 j, 整数型
.局部变量 GzTmo, 整数型
.局部变量 Gw项数组, 文本型, , "0"
.局部变量 Gw节数组, 文本型, , "0"
.局部变量 Gw值数组, 文本型, , "0"
通用对话框1.打开 ()
.如果真 (通用对话框1.文件名＝ “”)
返回 ()
.如果真结束
Go配置类.枚举节 (通用对话框1.文件名, Gw节数组)
.如果真 (取数组成员数 (Gw节数组) ＝ 0)
信息框 (“不是配置文件”, 0, , )
返回 ()
.如果真结束
.计次循环首 (取数组成员数 (Gw节数组), i)
GzTmo ＝超级列表框1.插入表项 (-1, , , , , )
超级列表框1.置标题 (GzTmo, 1, Gw节数组 [i])
清除数组 (Gw项数组)
清除数组 (Gw值数组)
Go配置类.枚举项 (通用对话框1.文件名, Gw节数组 [i], Gw项数组, Gw值数组)
.计次循环首 (取数组成员数 (Gw项数组), j)
      GzTmo ＝超级列表框1.插入表项 (-1, , , , , )
      超级列表框1.置标题 (GzTmo, 1, Gw节数组 [i])
      超级列表框1.置标题 (GzTmo, 2, Gw项数组 [j])
      超级列表框1.置标题 (GzTmo, 3, Gw值数组 [j])
.计次循环尾 ()
.计次循环尾 ()

.子程序 _按钮_导出_被单击
.局部变量 Go配置类, 类_配置项
.局部变量 i, 整数型
.局部变量 GwTmo1, 文本型
.局部变量 GwTmo2, 文本型
.局部变量 GwTmo3, 文本型
通用对话框2.打开 ()
.如果真 (通用对话框1.文件名＝ “”)
返回 ()
.如果真结束
.计次循环首 (超级列表框1.取表项数 (), i)
GwTmo1 ＝超级列表框1.取标题 (i － 1, 1)
GwTmo2 ＝超级列表框1.取标题 (i － 1, 2)
GwTmo3 ＝超级列表框1.取标题 (i － 1, 3)
.如果真 (GwTmo1 ≠ “” 且 GwTmo2 ≠ “”)
      Go配置类.写项文本 (通用对话框2.文件名＋ “.txt”, GwTmo1, GwTmo2, GwTmo3)
.如果真结束
.计次循环尾 ()

导入导出超级列表框.e

732.92 KB, 下载次数: 43, 下载积分: 精币 -2 枚

作者: zhx200 时间: 2018-7-29 01:09

xingwuzhe 发表于 2018-7-28 22:19
感谢分享，很给力！~

感谢支持！！！！

作者: afd 时间: 2018-7-29 03:38
精易模块就有这个功能的。。。。。。。。。

作者: 淘神 时间: 2018-7-29 09:17
1万条数据就会好卡

作者: zhx200 时间: 2018-7-29 09:41

凤凰二号发表于 2018-7-29 09:17
1万条数据就会好卡

一万条数据的作法不是这样了。要一次性读入内存，然后分析完了。最后再显示。

做为一个配置文件，数据行不会很多。

作者: wangdili19822 时间: 2018-7-29 10:43
感谢分享！！！！！！

作者: kyo9766 时间: 2018-8-2 08:35
感谢分享

作者: kmxddjw 时间: 2018-8-5 21:38
已下载学习，谢谢！！！

作者: posbb 时间: 2024-3-16 20:47
谢谢分享

欢迎光临精易论坛 (https://125.confly.eu.org/)