Carregar imagem

Boa tarde pessoal. Bom... preciso carregar uma imagem em uma Timage num form e salva-la em um diretório com um nome que está digitado em uma edit no mesmo form.

desde já agradeço.

>
Boa tarde pessoal. Bom... preciso carregar uma imagem em uma Timage num form e salva-la em um diretório com um nome que está digitado em uma edit no mesmo form.

desde já agradeço.

Obrigado galera mas já resolvi o problema assim:

procedure TFRM_ADD_DEL.Image1Click(Sender: TObject);
begin

if OpenPictureDialog1.Execute then
begin

 Image1.Picture.LoadFromFile(OpenPictureDialog1.FileName);
 image1.Picture.SaveToFile('C:\Documents and Settings\HOME\Desktop\CADASTRO DE AMIGOS\img\' +
 DBEdit1.Text + '.jpg');
 end;

end;