Delphi-Help

Описание

function PromptForFileName ( var FileName : string; { const Filter : string; const DefaultExt : string; const Title : string; const InitialDir : string; SaveDialog : Boolean = False } ) : Boolean;

Функция PromptForFileName представляет диалог пользователю, позволяющий передвижение и выбор файла.

Если пользователь нажал OK, переменной FileName присваивается значение полного пути: диск/путь/имя файла выбранного файла, и возвращается значение Истина(True).

Если пользователь нажал Cancel, никакие изменения не происходят, и возвращаемое значение будет Ложь(False).

Передающиеся параметры могут быть произвольными:

Filter

Используется, чтобы ограничить типы отображаемых файлов. Следующий формат:

'Description|filter{|...}'

Например, чтобы показать только .txt и .pas файлы:

Текстовые файлы (*.txt) | *.txt|Delphi файлы (*.pas) | *.pas

DefaultExt

Используется, чтобы определить расширение для добавления к новому имени файла (если SaveDialog Истенен(True)).

Title

Используется, чтобы дать диалогу заголовок.

InitialDir

Позиционирует диалог в данный каталог. Например:

'C:Program Files'

SaveDialog

Определяет, может ли новый файл быть выбран для сохранения.

Пример кода

var
selectedFile   : string;

begin
// Спрашиваем пользователя о выборе файла
if PromptForFileName(selectedFile,
'Text files (*.txt)|*.txt',
'',
'Выберите ваш проектный файл',
'C:\',
False)  // Означает, что диалог без Сохранения
then
// Отображения этого полного значения файла/пути
ShowMessage('Выбранный файл = '+selectedFile)
else
ShowMessage('Нажал Cancel');
end;

{В диалоге пользователь выбрал: C:\Files\data.txt и нажал OK}

Выбранный файл = C:\Files\data.txt

Примечание