tsavedialog

Ответ от
TSaveDialog - визуальный компонент. Он используется для выбора пользователем имени файла предназначенного для сохранения.
Он может быть определен перемещением значок с вкладки Dialogs или определяя переменную TSaveDialog.
TSaveDialog может быть сконфигурирован для удовлетворения ваших потребностей. При его использовании вы будете проходить через следующие шаги:
Создание объекта диалога
Вы определяете переменную TSaveDialog, затем присваиваете ей новый объект TSaveDialog:
var
saveDialog : TSaveDialog;
begin
saveDialog := TSaveDialog.Create(self);
Обратите внимание, что диалог должен иметь хозяина, в данном примере текущий объект мы снабжаем - self - как самостоятельный.
Диалог сохранения файла отобразится с выбором двух ниспадающих типов фильтров:
Delphi проектируют файлы
Delphi файлы Паскаля - это отображено в начале
Диалог установлен в текущий каталог (из которого было запущено приложение).
Если Вы выбрали файл 'Unit1.pas' то в диалоге ShowMessage отобразится:
Файл: File : C:Program FilesBorlandDelphi7ProjectsUnit1.pas