Thema: Delphi Exception bei OpenDialog

Einzelnen Beitrag anzeigen

Thomm

Registriert seit: 16. Aug 2008
Ort: Nürnberg
73 Beiträge
 
Turbo Delphi für Win32
 
#1

Exception bei OpenDialog

  Alt 30. Aug 2008, 22:09
Beim OpenDialog1 tritt bei mir immer Exception auf,
wenn man auf "Abbrechen" klickt

Delphi-Quellcode:
procedure TForm1.Oeffnen1Click(Sender: TObject);
begin
OpenDialog1.Execute;
try
clientdataset1.LoadFromFile(OpenDialog1.FileName);
except
Application.MessageBox('Datei kann nicht geöffnet werden','Fehler',16);
exit;
end;
end;
Weiß jemand wie das mit dem Button "Abbrechen" funktioniert ?
  Mit Zitat antworten Zitat