SaveDialog

  

Компонент delphi SaveDialog не визуальный компонент предназначенный для поддержки операции сохранения файлов способный работать с любыми типами файлов. При обращении к этому компоненту вызывается стандартное диалоговое окно сохранения файла.

Этот компонент идентичен компоненту OpenDialog поэтому много здесь не будет написано все уже сказано в предыдущей статье. Стоит лишь напомнить, что вызов диалогового окна, в котором пользователь указывает имя сохраняемого файла, является функция Execute() пример будет рассмотрена ниже.

1
2
3
4
5
6
7
8
9
procedure TForm3.Button3Click(Sender: TObject);
var fname:string;
begin
if savedialog3.Execute then //вызов диалогового окна
begin
fname:=savedialog2.FileName;
if fname<>'' then memo1.Lines.SaveToFile(fname);
end;
end;