怎么把配置项节点重新排列并按顺序修改？

200049749

配置文件： 范例节.txt (670 Bytes, 下载次数: 4)

2020-2-17 10:55 上传

点击文件名下载附件

KServer

昨天是你提问的？？我不是告诉你思路了

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

配置文件节名排序 (“J:\Chrome\范例节.txt”)

子程序名	返回值类型	公开	备 注
配置文件节名排序
参数名	类 型	参考	可空	数组	备 注
文件	文本型

变量名	类 型	静态	数组	备 注
old	类_内存配置项
new	类_内存配置项
array	文本型		0
i	整数型
list	文本型		0
n	整数型
id	整数型

old.加载配置项_从文件 (文件, 假)
old.取配置节名 (array)
计次循环首 (取数组成员数 (array), i)
如果真 (array [i] ＝ “SuiteItems”)
到循环尾 ()
old.取配置项名 (array [i], list)
计次循环首 (取数组成员数 (list), n)
new.写配置项 (“ID” ＋ 到文本 (id), list [n], old.读配置项 (array [i], list [n], ))
计次循环尾 ()
id ＝ id ＋ 1
计次循环尾 ()
old.清空 ()
new.写配置项 (“SuiteItems”, “Count”, 到文本 (id))
写到文件 (文件, new.取配置xx ())

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 配置文件节名排序 (“J:\Chrome\范例节.txt”)<br /> <br /> .子程序 配置文件节名排序<br /> .参数 文件, 文本型<br /> .局部变量 old, 类_内存配置项<br /> .局部变量 new, 类_内存配置项<br /> .局部变量 array, 文本型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 list, 文本型, , "0"<br /> .局部变量 n, 整数型<br /> .局部变量 id, 整数型<br /> <br /> old.加载配置项_从文件 (文件, 假)<br /> old.取配置节名 (array)<br /> .计次循环首 (取数组成员数 (array), i)<br />     .如果真 (array <i> ＝ “SuiteItems”)<br />         到循环尾 ()<br />     .如果真结束<br />     old.取配置项名 (array <i>, list)<br />     .计次循环首 (取数组成员数 (list), n)<br />         new.写配置项 (“ID” ＋ 到文本 (id), list [n], old.读配置项 (array <i>, list [n], ))<br />     .计次循环尾 ()<br />     id ＝ id ＋ 1<br /> .计次循环尾 ()<br /> old.清空 ()<br /> new.写配置项 (“SuiteItems”, “Count”, 到文本 (id))<br /> 写到文件 (文件, new.取配置xx ())

wzj2015

建议写配置项之前先排序，如果后面在排序，可以用正则，不过项目多了后很容易弄错，也就是ID后面的三项容易混乱

Bszk

读取全部节点保存在数组里面，然后把这个文件清空，重新按着你需要的顺序写入即可

200049749

KServer 发表于 2020-2-17 11:36
昨天是你提问的？？我不是告诉你思路了

  

[/quote]
[e=1].版本 2

变量名	类 型	静态	数组	备 注
读配置	文本型
新配置	文本型
旧配置文本	文本型
number	整数型
find	整数型

读配置 ＝ 取特定目录 (3) ＋ “\更新前.txt”
新配置 ＝ 取特定目录 (3) ＋ “\更新后.txt”
旧配置文本 ＝ 到文本 (读入文件 (读配置))
number ＝ 0
find ＝ 寻找文本 (旧配置文本, “[”, , 假)
判断循环首 (find ≠ -1)
旧配置文本 ＝ 子文本替换 (旧配置文本, 取文本中间 (旧配置文本, find, 寻找文本 (旧配置文本, “]”, find, 假) － find ＋ 1), “[” ＋ 到文本 (number) ＋ “]”, , , 真)
number ＝ number ＋ 1
find ＝ 寻找文本 (旧配置文本, “[”, find ＋ 1, 假)
判断循环尾 ()
写到文件 (新配置, 到字节集 (旧配置文本))

i支持库列表	支持库注释
shell	操作系统界面功能支持库

.版本 2</blockquote></div><br /> [e=1].版本 2<br /> .支持库 shell<br /> <br /> .局部变量 读配置, 文本型<br /> .局部变量 新配置, 文本型<br /> .局部变量 旧配置文本, 文本型<br /> .局部变量 number, 整数型<br /> .局部变量 find, 整数型<br /> <br /> 读配置 ＝ 取特定目录 (3) ＋ “\更新前.txt”<br /> 新配置 ＝ 取特定目录 (3) ＋ “\更新后.txt”<br /> 旧配置文本 ＝ 到文本 (读入文件 (读配置))<br /> number ＝ 0<br /> find ＝ 寻找文本 (旧配置文本, “[”, , 假)<br /> .判断循环首 (find ≠ -1)<br />     旧配置文本 ＝ 子文本替换 (旧配置文本, 取文本中间 (旧配置文本, find, 寻找文本 (旧配置文本, “]”, find, 假) － find ＋ 1), “[” ＋ 到文本 (number) ＋ “]”, , , 真)<br />     number ＝ number ＋ 1<br />     find ＝ 寻找文本 (旧配置文本, “[”, find ＋ 1, 假)<br /> .判断循环尾 ()<br /> 写到文件 (新配置, 到字节集 (旧配置文本))

这样就OK了    我解决了   分就给你把