Thema
:
Delphi
Exception bei OpenDialog
Einzelnen Beitrag anzeigen
omata
Registriert seit: 26. Aug 2004
Ort: Nebel auf Amrum
3.154 Beiträge
Delphi 7 Enterprise
#
3
Re: Exception bei OpenDialog
30. Aug 2008, 23:11
markieren
Delphi-Quellcode:
procedure
TForm1.Oeffnen1Click(Sender: TObject);
begin
if
OpenDialog1.Execute
then
begin
try
clientdataset1.LoadFromFile(OpenDialog1.FileName);
except
Application.MessageBox('
Datei kann nicht geöffnet werden
', '
Fehler
', 16);
end
;
end
;
end
;
Zitat
omata
Öffentliches Profil ansehen
Mehr Beiträge von omata finden