Hallo
wenn ich das Dialog-Fenster von OpenDialog schließe ohne ein
Klick auf "Öffnen", wird trotzdem ein Bild geöffnet
Und wenn ich kein Bild wähle und klicke ich auf Abbrechen dann erscheint Eine Fehlermeldung
"Die Datei wurde nicht gefunden "
Also
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
if LowerCase(ExtractFileExt(OpenDialog1.Filename)) ='.bmp' then begin
image1.Picture.Bitmap.Loadfromfile(OpenDialog1.FileName);
end;
end;
Was muss ich dazu hinzufügen, damit der Code das Bild lädt nur wenn man auf öffnen anklickt?