Hallo Marabu!
Erst mal Danke schön!
Ich habe den Code angepast.
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
i: Integer;
nl: IXMLDOMNodeList;
e: IXMLDOMElement;
begin
nl := xmlDoc.documentElement.selectNodes('movie');
for i := 0 to Pred(nl.length) do
begin
e := nl.item[i] as IXMLDOMElement;
ShowMessage(VarToStr(e.getAttribute('id')));
end;
end;
Da stimmt aber etwas nicht die Länge(nl.length) von nl=0 und die for schleife wird sofort beendet.
Grüsse
Chris