urgh? Lesen Von Adresse 00000000 error bei... ???

[Skyruner2]

hi
Ich habe keine ahrnung warum ich diesen error habe....
Hier ist das exception fenster
nach dem error springt der de-bugger Hier hin

und der code (der macht noch net fiel)
error bei: button2click

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
openDialog1.Execute;
edit3.text:=opendialog1.FileName;
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  filedata, datacontent : tStringlist;
  databegin, dataend :integer;
begin
If openDialog1.Filename = ''
then showmessage('no file loaded dumbass')
else
  begin
    try
      filedata.Create;
      try
        filedata.LoadFromFile(opendialog1.FileName);
      except
        on E: Exception do
          begin
            showmessage(e.Message);
          end;
      end;

      databegin:=filedata.IndexOf(edit1.Text);
      dataend:=filedata.IndexOf(edit2.Text);

    finally
      FreeAndNil(filedata);
      FreeAndNil(datacontent);
    end;
  end;
end;

hab ich wieder was falsch geschrieben??
wenn ich den error ignorire, un das programm weiterlaufen lasse, ist die gleich message in der showmessage nachricht.... also muss es an:
filedata.LoadFromFile(opendialog1.FileName);
liegen

ist auch wenn ich dass file zB in ein memo feld lade.