Функция SelectDirectory( var Directory: string;
Options: TSelectDirOpts;
HelpCtx: LongInt ): Boolean;
Функция SelectDirectory( const Caption: string; const Root: WideString; out Directory: string ): Boolean;
Модуль: FileCtrl
type
TSelectDirOpt = set of (sdAllowCreate, sdPerformCreate, sdPrompt);
TSelectDirOpts = set ofTSelectDirOpt;
Описание
Функция выводит диалоговое окно для ввода имени каталога пользователем.
В качестве результата функция возвращает True, если пользователь выбрал каталог и нажал [OK], и False, если пользователь нажал [Cancel] или закрыл диалоговое окно без выбора каталога.
Для первого варианта синтаксиса:
Directory - каталог, который при вызове диалогового окна на экран появится в качестве выбранного каталога. При выборе каталога пользователем, имя каталога записывается в переменную Directory. При этом значение текущего каталога в системе не изменяется.
HelpCtx - идентификатор контекста справки.
Options - множество величин, определяющих дополнительные параметры. Если данный параметр пустой, то поле редактирования имени каталога не отображается и для пользователя будет доступен только выбор каталога из списка, т.е. пользователь не сможет ввести имя каталога с клавиатуры.
Параметр Options может иметь следующие значения:
Величина
Описание
sdAllowCreate
Диалоговое окно будет содержать поле редактирования имени каталога. В данное поле может быть введено имя не существующего каталога. Указанное имя каталога будет записано в переменную Directory, но при этом сам каталог создан не будет.
sdPerformCreate
Используется только совместно с величиной sdAllowCreate. Когда пользователь вводит несуществующий каталог, функция создает его.
sdPrompt
Использование данного значения возможно только тогда, когда параметр Options содержит значение sdAllowCreate. Если пользователь вводит имя не существующего каталога, то функция спрашивает, нужно ли создать каталог. Если параметр Options содержит значение sdPerformCreate и пользователь нажимает кнопку [OK], то указанный каталог создается. В противном случае, каталог создан не будет.
Во втором варианте синтаксиса функция выводит стандартный диалог Windows для выбора каталога.
Caption - заголовок диалога.
Root - корневой каталог.