Как сделать, чтобы при вызове окна SaveDialog в поле "Имя файла" стояла строка из Edit'a?

SaveDialog.FileName := Edit1.Text;
if SaveDialog.Execute then begin
    // выбрали
end;

автор: Vovan-VE