Preciso Exemplo Do Savedialog1

[Guest - gel -]

Ola,

O meu problema é bem simples

Só que não conheco delphi,

eu tenho uma imagem com o logo de um software ex: logo do antivirus AVG.

Eu queria clicar na foto e abrir o dialogo de salvar como com o nome do programa já selecionado e pudesse escolher onde gravar na maquina do usuario....

Eu sei que é simples,,,,

mas não tem exemplos claros.....

Se alguém souber,,,,

Agradeço....

Abracos.

[Thales Pontes Martins]

procedure TForm1.image1click(sender: tobject);
begin
  savedialog1.filename:='avg.exe'; // só um exemplo
  if savedialog1.execute then  // execute será true se o usuario clicar em salvar e false se clicar em cancelar
  begin
     // coloque o código pra salvar o arquivo aqui
     // tipo : 
     //image1.picture.savetofile(savedialog1.filename);
  end;
end;