這篇文章主要為大家展示了“Delphi NativeXml怎么用”,內容簡而易懂,條理清晰,希望能夠幫助大家解決疑惑,下面讓小編帶領大家一起研究并學習一下“Delphi NativeXml怎么用”這篇文章吧。
NativeXml可以在官網上下載,下載后將文件夾放在指定地方,打開DELPHI在其環境變量中引用NativeXml路徑,然后在程序中引用NativeXml單元,我們就可以使用NativeXml了。
NativeXml的方法屬性:
ANativeXml := TNativeXml.Create(Self);//創建
ANativeXml.XmlFormat := xfReadable; //格式
ANativeXml.EncodingString := ""UTF-8"";//編碼
ANativeXml.ExternalEncoding := seUTF8;
ANativeXml.LoadFromFile();//從文件夾中導入XML文件
ANativeXml.SaveToFile();//XML文件保存到文件夾
節點的方法屬性:
ANativeXml.Root;//XML文件的根節點,注意一切都從根開始
ANativeXml.Root.NodeByName(‘節點名’);//通過節點名獲得節點
NativeXml.Root.Attributes;//節點的屬性對象
NativeXml.Root.ChildContainers;//節點的字節點對象
NativeXml.Root.NodeNew();//增加新的子節點
NativeXml.Root.Name;//節點名
NativeXml.Root.Value;//節點值
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.
輸出結果:張三
21
ID="No.1"
李四
22
ID="No.2"
王五
33
ID="No.3"
以上是“Delphi NativeXml怎么用”這篇文章的所有內容,感謝各位的閱讀!相信大家都有了一定的了解,希望分享的內容對大家有所幫助,如果還想學習更多知識,歡迎關注億速云行業資訊頻道!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。