Zitat von
Chegga:
Delphi-Quellcode:
procedure TForm1.ffnen1Click(Sender: TObject);
begin
try
if OpenDialog1.Execute then
wasduwillst.LoadFromFile (OpenDialog1.FileName);
// "wasduwillst" ist in dem Fall eine Variablenvereinbarung
except
ShowMessage ('Fehler beim Öffnen der Datei!');
end;
end;
Wieso muss das
try vor
if OpenDialog1.Execute then
Wenn, dann hätte ich's so gemacht:
Delphi-Quellcode:
if OpenDialog1.Execute then
try
wasduwillst.LoadFromFile (OpenDialog1.FileName);
// "wasduwillst" ist in dem Fall eine Variablenvereinbarung
except
ShowMessage ('Fehler beim Öffnen der Datei!');
end;
Es kann sein, dass es so, wie du's geschrieben hast, auch korrekt ist, nur verstehe ich das nicht.