Problem mit TOpenDialog

[Fredyy]

Hi,
ich ahbe ein Problem nur weiß ich nicht wie ich es beheben kann.

mein code:

Delphi-Quellcode:

      OpenDialog1.DefaultExt := 'dat';
      OpenDialog1.Filter := 'Data File (*.dat)|*.dat';
      OpenDialog1.Options := [ofHideReadOnly,ofFileMustExist,ofEnableSizing];
      OpenDialog1.Execute;
      Memo1.Lines.LoadFromFile(OpenDialog1.Files[0]);
      Memo2.Lines.LoadFromFile(OpenDialog1.Files[0]);

Es funktioniert gut nur wenn im opendialog auf abrechen oder des [x] klickt bekomme ich einen fehler mit welche abfrage kann ich so etwas abfangen?.

wäre euch sehr dank bar wenn ihc mir helfen könntet.

bye
Fredyy