Problem mit XML Datei

[Akut-Programming]

Ich gebs gleich auf... - Umgestellt -> Neue Zugriffsverletzung:

Delphi-Quellcode:

procedure Tfrm_main.FormCreate(Sender: TObject);
begin
  instpath:=ExtractFilePath(Application.ExeName);
  if not FileExists(xmlfilename) then FileCreate(xmlfilename);
  if FileExists(xmlfilename)
  then begin
    xmlDoc.load(xmlfilename)                  // Nu kommtse hier
    xmlDoc := CoDOMDocument40.Create;
    xmlDoc.setProperty('NewParser', true);
  end else xmldoc.loadXML('<?xml version="1.0" encoding="iso-8859-1"?><BuddLister/>');
end;