Registriert seit: 6. Mär 2013
6.158 Beiträge
Delphi 10 Seattle Enterprise
|
AW: XML Daten lesen
29. Aug 2018, 17:02
So:
Delphi-Quellcode:
implementation
uses XmlIntf, XmlDoc, XPathHelper;
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
const
xPath = '//TransaccionError/Error';
var
xmlDoc: IXMLDocument;
xmlNode: IXMLNode;
begin
xmlDoc := LoadXMLData(Memo1.Lines.Text);
xmlNode := TXpathHelper.SelectNode(xmlDoc.DocumentElement, xPath);
ShowMessage(xmlNode.Text);
end;
XPathHelper.pas ist hier:
https://www.delphipraxis.net/177650-...ml#post1236534
|