delphi还有人用吗 Delphi中关于读取XML内容？

Delphi中关于读取XML内容？使用txmldocument进行解析。但是，由于的项是集合，因此只能逐个读取，这有点麻烦。下面是我为您编写的解析程序，它可以显示showmessage中每个项的名称和

Delphi中关于读取XML内容？

使用txmldocument进行解析。但是，由于的项是集合，因此只能逐个读取，这有点麻烦。下面是我为您编写的解析程序，它可以显示showmessage中每个项的名称和值。保持d2007下方的线路通过变量：IntegerRotNode: IXMLNodebeginself.XMLDoc.Active活动:= Falseself.XMLDoc.XML文件. text:=“您的XML”选择f。XMLDoc.活动：=trueRootNode:=self.XMLDoc.DocumentElementfori文件:=0 toRootNode.ChildNodes文件[0]. 子节点。计数-1dobeginshowmessageFmt（“名称=%s，值=%s”，[VarToStr（根节点.ChildNodes[0].ChildNodes[i].Attributes[“name”]），VarToStr（根节点.ChildNodes[0].ChildNodes[i].Attributes[“value”]）]结束