Delphi中关于读取XML内容？

用TXMLDocument来解析.不过因为的Item因为是一个集合,所以只能循环一个一个读,有点麻烦,下面是我帮你写的一个解析程序,可以把每个Item的name和Value都ShowMessage显示出来.在D2007下持行通过.vari:integer;RootNode:IXMLNode;beginself.XMLDoc.Active:=False;self.XMLDoc.XML.Text:='你的XML';self.XMLDoc.Active:=true;RootNode:=self.XMLDoc.DocumentElement;fori:=0toRootNode.ChildNodes[0].ChildNodes.Count-1dobeginshowmessageFmt('name=%s,value=%s',[VarToStr(RootNode.ChildNodes[0].ChildNodes[i].Attributes['name']),VarToStr(RootNode.ChildNodes[0].ChildNodes[i].Attributes['value'])]);end;end;