Einzelnen Beitrag anzeigen

Der schöne Günther

Registriert seit: 6. Mär 2013
6.158 Beiträge
 
Delphi 10 Seattle Enterprise
 
#2

AW: XML Daten lesen

  Alt 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
  Mit Zitat antworten Zitat