Fórum XMLDocument #335426

procedure TForm1.Button1Click(Sender: TObject);
var
  NodeList : IDOMNode;
begin
 NodeList := XMLDocument1.DOMDocument.childNodes[1].ChildNodes[0].ChildNodes[0];
 Label1.Caption := NodeList.nodeName;
 Label2.Caption := NodeList.nodeValue;
end;