Delphi中關(guān)于讀取XML內(nèi)容？使用txmldocument進(jìn)行解析。但是，由于的項(xiàng)是集合，因此只能逐個(gè)讀取，這有點(diǎn)麻煩。下面是我為您編寫(xiě)的解析程序，它可以顯示showmessage中每個(gè)項(xiàng)的名稱和

Delphi中關(guān)于讀取XML內(nèi)容？

使用txmldocument進(jìn)行解析。但是，由于的項(xiàng)是集合，因此只能逐個(gè)讀取，這有點(diǎn)麻煩。下面是我為您編寫(xiě)的解析程序，它可以顯示showmessage中每個(gè)項(xiàng)的名稱和值。保持d2007下方的線路通過(guò)變量：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é)束