bild speichern unter

[f4r]

SO hab jetzt nochmal ne frage:

hier erstmal der quellcode

Code:

procedure TPicshowForm.Label7Click(Sender: TObject);
var filename2:string;
begin
   with SaveDialog1 do
   begin
    Filename := 'Bild' + inttostr(pic);
    Filename2:=''+Filename+'.jpg';
    Filter := 'Jpeg Files (*.jpg)|*.jpg';
    Title := 'Bild speichern unter ';
    if Execute then
     begin
        Image1.Picture.SaveToFile(filename2);
     end;
    end;

end;

so hab jetzt errstmal alles rausgenommen um zu das problem lokalisieren zu koennen
resultat war das es nicht an der funktion liegt !
Die Fehlermeldungen (siehe anhang) kommen nachdem man egspeichert hat.

ich kanns mir logisch natuerlich nicht erklären,aber der zweiten meldung nach zu folgen ( die kommt wenn man das naechste bild oeffnen will) befindet sich das projekt oder die exe nicht mehr im gleichen verzeichnis

habt ihr da ne idee was das noch sein koennte ???

gruss
f4r