LightWeight XML-Unit gesucht

[Luckie]

@xaromz: Wie kann ich denn mit deiner Unit eine XML-Dati laden?
Ic habe das jetzt so versucht:

Delphi-Quellcode:

procedure TImport.Import;
var
  User: TUser;
  XMLDoc: IXMLDOMDocument;
begin
  User := TUser.Create;
  XMLDoc := CoDOMDocument40.Create;

  if XMLDoc.load(FXMLFile) then
  begin
    writeln('gut');
  end
  else
  begin
    Writeln('Fehler');
  end;

  //Add(User);
end;

Aber da steigt er mir sofort aus dem Programm aus ohne Fehlermeldung oder so.

Die XML Datei im Anhang.