XMLNode AddChild beim auslesen leer?

[chaosben]

Hi!

Ich denke, da liegt ein logischer Fehler in deinem Code vor. Ich hab bei mir folgenden mal probiert:

Delphi-Quellcode:

var
  xml : TXMLDocument;
  node : IXMLNode;
begin
  xml:=TXMLDocument.Create(Self);
  xml.Active:=true;
  node:=xml.AddChild('root');
  node:=node.AddChild('files');
  node.AddChild('file');
  node.AddChild('file');

  node:=node.ChildNodes.First;
  while Assigned(Node) do
  begin
    MessageDlg(node.XML, mtWarning, [mbOK], 0);
    Node:=node.NextSibling;
  end;
end;

Und das geht wunderbar.

Du könntest jetzt 2 Dinge tun:
1. Meinen Code probieren ob er geht. Wenn nicht, haben wir ein grundsätzliches Problem
2. Deinen Code noch mal genau studieren und wenn du nichts findest, ihn mal möglichst komplett hier posten.