Hallo Susanne,
vielleicht hilft dir das ein Stück auf deinem Weg:
Delphi-Quellcode:
procedure TWebForm.DemoButtonClick(Sender: TObject);
var
i: Integer;
doc: IXMLDOMDocument2;
nl: IXMLDOMNodeList;
n: IXMLDOMNode;
begin
doc := CoDomDocument40.Create;
doc.async := False;
if doc.load('
c:\daten\dp\info.xml')
then
begin
nl := doc.selectNodes('
//Document');
for i := 0
to Pred(nl.length)
do
begin
n := nl.item[i];
n := n.attributes.getNamedItem('
ID');
ShowMessage(VarToStr(n.nodeValue));
end;
end;
end;
Grüße vom marabu