Компонент Окно сохранения файла (SaveDialog)

Компонент Окно выбора файла (OpenDialog)

 

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

 

Таблица. Свойства компонента OpenDialog

Свойство Назначение
DefaultExt Расширение имени, используемое по умолчанию. Добавляется в конец выбранного пользователем имени файла, если расширение не указано явно
FileName Выбранное пользователем имя файла вместе с полным путем поиска
Files Список выбранных имен файлов. В свойстве Options должен быть включен флажок ofAllowMultiSelect
Filter Набор масок, в соответствии с которыми отбираются имена файлов отображения в диалоговом окне. Каждая маска состоит из двух частей: названия и шаблона, — разделенных символом |. Одному названию могут соответствовать несколько шаблонов. Маски отделяются друг от друга символом |
Filterlndex Номер текущей маски. Нумерация начинается с 1
HistoryList Список ранее выбранных файлов (тип TStrings)
InitialDir   Текущий каталог, содержимое которого отображается при первом открытии диалогового окна
Options Набор флажков, определяющих работу окна выбора файлов
Title Заголовок диалогового окна

 

Таблица. События компонента OpenDialog

Событие Условие генерации
OnCanClose   Пользователь пытается закрыть диалоговое окно. Обработчик этого события позволяет проконтролировать правильность выбранного или введенного в соответствующее поле окна имени файла и разрешить или запретить закрытие
OnFolderChange Пользователь переключился в другой каталог
Onlndudeltem К текущему списку файлов в диалоговом окне будет добавлено новое имя. (Обработчик данного события дает возможность отбирать допустимые имена по алгоритму, определяемому программистом)
OnSelectionChange Пользователь выбрал новое имя файла в диалоговом окне
OnTypeChange Пользователь выбрал новую маску файлов (свойство Filter)

 

Пример.

 

procedure TForml:Button1Click(Sender: TObject);

begin

OpenDialogl.Filter := 'Все файлы ( * . *) I *.* I Файлы Паскаля (*.pas)I*.PAS';

OpenDialogl.Title := 'Выбор нужного файла'; OpenDialogl.Filterlndex := 2;

if OpenDialogl.Execute then

begin

AssignFile(F, OpenDialogl.FileName);

end;

end;

В этом примере при щелчке на кнопке отображается объект OpenDialog1, который имеет заголовок Выбор нужного файла, а в списке отображаются все файлы, имеющие расширение .PAS. Это обеспечивается присвоением свойству FilterIndex значения 2.

 

 

Он почти ничем не отличается от компонента OpenDialog за исключением некоторых настроек, специфичных для процесса сохране­ния файла.