靓女镇楼
xml文件的基础操作就不重复赘述了, 按键上都有详细示例,点一下对应的函数就能看到
↓上封装源码↓
Import "Xml.lua"
Dim XMLDate, XMLItem, xml路径, 读取结果
xml路径 = "/sdcard/Pictures/1.xml"
读取结果 = File.ReadLines(xml路径)
Function 读写某个子节点的值(读还是写, 写什么, 第几个子节点, 子节点名)
// 从文件中加载XML
XMLDate = Xml.ParseByXmlFile(xml路径)
// 查找子节点
XMLItem = Xml.Find(XMLDate, "Config")
If 读还是写 = "读" Then
读写某个子节点的值 = XMLItem[第几个子节点][子节点名]
ElseIf 读还是写 = "写" Then
XMLItem[第几个子节点][子节点名] = 写什么
Call Xml.Save(XMLItem, xml路径)
End If
End Function
以上是封装的函数,而调用它们有2种 读取和写入↓↓↓↓
例:↓
Dim 筛选行 = 读写某个子节点的值("读","",1,"当前筛选行") //读取操作
Call 读写某个子节点的值("写", Int(筛选行) + 1, 1, "当前筛选行") //写入操作
↓调用需要填写4个参数,就是给4个条件它, 它会根据你给的条件返回对应的结果↓
读写某个子节点的值(读还是写, 写什么, 第几个子节点, 子节点名)
参数1: 只能填写 读 或者 写 ,用来判断是执行读取操作还是写入操作
参数2:如果第一个参数是读,填个空字符串就行,如果第一个参数是写,那么填你要写入的内容
参数3:填你要操作的子节点的下标(标识),1代表第一个子节点,2代表第二个
参数4:填你要操作的子节点的名称
这个xml的读写操作封装并不完美,有没发现我把某个节点写死了 "Config"
XMLItem = Xml.Find(XMLDate, "Config") 这句话的意思是 从XMLDate节点数据里,找节点名为"Config"的所有子节点, 这是我的需求决定的,实际上是可以修改得更灵活
函数的参数加一个↓↓↓↓↓↓
读写某个子节点的值(读还是写, 写什么, 第几个子节点, 子节点名, 要操作的主节点名)
下面这句就得改下,固定的"Config"改为 参数名:要操作的主节点名 ↓↓↓↓↓↓
XMLItem = Xml.Find(XMLDate, 要操作的主节点名)
这样就会更加灵活
好了...... 总结下 ,为什么要这么做
1.需求需要这么做
2.封装后 多次调用都只需要一行代码 ,无论读还是写
当然如果你的需求不适合我这样的封装 也可以自行修改,以上仅供参考学习!!!
按键精灵学习交流群:862088303 虽然基本没人...