您好,登錄后才能下訂單哦!
這篇文章主要為大家展示了“Delphi NativeXml怎么用”,內(nèi)容簡而易懂,條理清晰,希望能夠幫助大家解決疑惑,下面讓小編帶領(lǐng)大家一起研究并學(xué)習(xí)一下“Delphi NativeXml怎么用”這篇文章吧。
NativeXml可以在官網(wǎng)上下載,下載后將文件夾放在指定地方,打開DELPHI在其環(huán)境變量中引用NativeXml路徑,然后在程序中引用NativeXml單元,我們就可以使用NativeXml了。
NativeXml的方法屬性:
ANativeXml := TNativeXml.Create(Self);//創(chuàng)建
ANativeXml.XmlFormat := xfReadable; //格式
ANativeXml.EncodingString := ""UTF-8"";//編碼
ANativeXml.ExternalEncoding := seUTF8;
ANativeXml.LoadFromFile();//從文件夾中導(dǎo)入XML文件
ANativeXml.SaveToFile();//XML文件保存到文件夾
節(jié)點的方法屬性:
ANativeXml.Root;//XML文件的根節(jié)點,注意一切都從根開始
ANativeXml.Root.NodeByName(‘節(jié)點名’);//通過節(jié)點名獲得節(jié)點
NativeXml.Root.Attributes;//節(jié)點的屬性對象
NativeXml.Root.ChildContainers;//節(jié)點的字節(jié)點對象
NativeXml.Root.NodeNew();//增加新的子節(jié)點
NativeXml.Root.Name;//節(jié)點名
NativeXml.Root.Value;//節(jié)點值
var Form1: TForm1; xml:TNativeXml; const xmlstr= '<?xml version="1.0" encoding="UTF-8"?>' + '<List>' + '<item ID="No.1" age="21">張三</item>' + '<item ID="No.2" age="22">李四</item>' + '<item ID="No.3" age="33">王五</item>' + '</List>'; procedure TForm1.btn1Click(Sender: TObject); var node:TXmlNode; i:Integer; begin for i := 0 to xml.Root.NodeCount-1 do begin node:=xml.Root[i]; mmo2.Lines.Add(node.Value); mmo2.Lines.Add(node.AttributeByName['age'].Value); mmo2.Lines.Add(node.Attributes[0].WriteToString); end; end.
輸出結(jié)果:張三
21
ID="No.1"
李四
22
ID="No.2"
王五
33
ID="No.3"
以上是“Delphi NativeXml怎么用”這篇文章的所有內(nèi)容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內(nèi)容對大家有所幫助,如果還想學(xué)習(xí)更多知識,歡迎關(guān)注億速云行業(yè)資訊頻道!
免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點不代表本網(wǎng)站立場,如果涉及侵權(quán)請聯(lián)系站長郵箱:is@yisu.com進(jìn)行舉報,并提供相關(guān)證據(jù),一經(jīng)查實,將立刻刪除涉嫌侵權(quán)內(nèi)容。