delphi還有人用嗎 Delphi中關(guān)于讀取XML內(nèi)容?
Delphi中關(guān)于讀取XML內(nèi)容?使用txmldocument進(jìn)行解析。但是,由于的項(xiàng)是集合,因此只能逐個(gè)讀取,這有點(diǎn)麻煩。下面是我為您編寫的解析程序,它可以顯示showmessage中每個(gè)項(xiàng)的名稱和
Delphi中關(guān)于讀取XML內(nèi)容?
使用txmldocument進(jìn)行解析。但是,由于的項(xiàng)是集合,因此只能逐個(gè)讀取,這有點(diǎn)麻煩。下面是我為您編寫的解析程序,它可以顯示showmessage中每個(gè)項(xiàng)的名稱和值。保持d2007下方的線路通過變量:IntegerRotNode: IXMLNodebeginself.XMLDoc.Active活動(dòng):= Falseself.XMLDoc.XML文件. text:=“您的XML”選擇f。XMLDoc.活動(dòng):=trueRootNode:=self.XMLDoc.DocumentElementfori文件:=0 toRootNode.ChildNodes文件[0]. 子節(jié)點(diǎn)。計(jì)數(shù)-1dobeginshowmessageFmt(“名稱=%s,值=%s”,[VarToStr(根節(jié)點(diǎn).ChildNodes[0].ChildNodes[i].Attributes[“name”]),VarToStr(根節(jié)點(diǎn).ChildNodes[0].ChildNodes[i].Attributes[“value”])]結(jié)束