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

markieren

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?

Ändere mal if savedialog1.Execute then in if opendialog1.Execute then

Ich habe die erste Zeile vertippt
Aber das liegt natürlich nicht daran

.Execute() sollte aber nur wahr werden, wenn eine Datei ausgewählt wird und nicht bei Abbruch

Zitat von mkinzler:

.Execute() sollte aber nur wahr werden, wenn eine Datei ausgewählt wird und nicht bei Abbruch

Ja stimmt aber das Problem ist nicht beim erst Aufruf sondern ab 2. Aufruf

Zitat von thomas2009:

Ja stimmt aber das Problem ist nicht beim erst Aufruf sondern ab 2. Aufruf

Dann wird aber kein Bild geladen, sondenr es bleibt einfach das zuerst geladene in der Anzeige

ist ja klar, weil das bild ja nicht gelöscht wird, oder vllt versteh ich dich jetzt auch falsch, von dem was du möchtest

markieren

Delphi-Quellcode:

image1.picture:=nil;
  if OpenDialog1.Execute then
    begin
if LowerCase(ExtractFileExt(OpenDialog1.Filename)) ='.bmp' then begin
image1.Picture.Bitmap.Loadfromfile(OpenDialog1.FileName);
end;
end;

aber warum nutzt du nicht den Filter von OpenDialog um auch nur die Auswahl von bmp zu erlauben? (bmp|*.bmp)?

Zitat von Meflin:

Dann wird aber kein Bild geladen, sondern es bleibt einfach das zuerst geladene in der Anzeige

Nein, sondern es erscheint eine Fehlermeldung :
"die Datei bla bla wurde nicht gefunden"

d.h. der Pfad der vorhergewählte Datei bleibt gespeichert
darum sehe ich die Fehlermeldung, wenn ich die alte Datei umbenenne und dann beim OpenDialog-Fenster auf Abbrechen anklicke

Zitat von mkinzler:

image1.picture:=nil;

Was soll das heissen ? Warum soll ich das alte Bild löschen

Greifst du an anderer Stelle auf den alten Pfad zu oder lädst das Bild an anderer Stelle neu?
Denn dein Code von oben wird nur ausgeführt, wenn auf "OK" geklickt wurde. Also würde ich sagen, dass es nicht an diesem liegen kann.

Grüße, Matze

das mit dem nil, da bin ich in der Zeile verrutscht, dachte du wolltest das so, aber okay

btw warum sollte man das Bild umbennen, also ich kann deinen Fehler nicht nachvollziehen, aber okay
vllt kannst du ja noch auf FileExist prüfen

Edit: naja wenn du die Datei umbennenst und dann nochmal laden willst,d.h. den File nicht mehr anklicken, sondern einfach nur öffnen, dann ist es ja klar, dass es zu einem Error kommt, da die Datei nicht mehr existiert.