bild speichern unter

[f4r]

hi leute
hab schon gesucht aber mich gewundert warum das net gefunden hab

also hier die frage

möchte über ein label ein bild das scho geladem wurden ist speichern, dabei soll der user sich den pfad mittels eines normales windows dialoges aussuchen können
der dialog soll von vorne herein aber auf desktop stehen wie geht das ?

das was ich bisjetzt hab :

Delphi-Quellcode:

procedure TPicshowForm.Label7Click(Sender: TObject);
begin
SaveDialog1.FileName:=''+Label3.caption+'';
With SaveDialog1 do
          if execute then
             begin
             TextPfad:=FileName;
             AssignFile(TextDatei,TextPfad);
             Rewrite(Textdatei);
             CloseFile(TextDatei);
             end;
end;

hilft mir jemand bitte

gruss