Отображает диалоговое окно Open и возвращает имя выбранного файла.
Синтаксис:
GETFILE([cFileExtensions] [, cDialogCaption] [, cOpenButtonCaption] [, nButtonType] [, cCreatorType])
Параметры:
cFileExtensions
Задает расширения имен файлов, отображаемых в прокручиваемом списке, если элемент меню All Files не установлен.
Аргумент cFileExtensions может принимать разные формы:
Если cFileExtensions содержит только одно расширение имени (например PRG), на экране отображаются только файлы с данным расширением.
cFileExtensions может содержать список расширений имен файлов, разделенных точкой с запятой. Например, если задать PRG;FXP, то будут отображены все файлы с расширением имени .PRG или .FXP.
Если существуют файлы с одинаковыми именами, но с разными расширениями (например CUSTOMER.PRG и CUSTOMER.FXP), будет отображен только тот файл, расширение которого приведено в списке cFileExtensions первым.
cFileExtensions может содержать список расширений имен файлов, разделенных вертикальными линиями (например, PRG | FXP). В этом случае будут отображены все файлы с этими расширениями, даже если файлы имеют одинаковые имена.
Если cFileExtensions содержит только точку с запятой (;), будут отображены все файлы без расширений.
Если cFileExtensions представляет собой пустую строку, будут отображены все файлы текущего каталога, если не указан аргумент cCreatorType.
cFileExtensions может также содержать символы подстановки (* и ?). Отображаются все файлы, расширения которых удовлетворяют данному критерию с учетом символов подстановки. Например, если cFileExtensions содержит ?X?, будут отображены все файлы с расширениями .FXP, .EXE и .TXT.
cDialogCaption
Задает надпись, появляющуюся вверху диалогового окна Open.
cOpenButtonCaption
Задает надпись для кнопки OК.
nButtonType
Задает число и тип кнопок, изображаемых в диалоговом окне Open. Ниже перечислены кнопки, появляющиеся в этом диалоговом окне, когда значение nButtonType равно 0, 1 или 2.
Если значение nButtonType равно 1 и пользователь нажимает кнопку New, возвращается название "Untitled" вместе с путем, заданным в диалоговом окне Open. Если значение nButtonType равно 2 и пользователь нажимает кнопку None, возвращается пустая строка.
cCreatorType
Доступно только в FoxPro для Macintosh.
Отображает в прокручиваемом списке файлы, созданные приложениями конкретного типа.
Если аргумент cFileExtensions представляет собой пустую строку, в прокручиваемом списке будут отображены только файлы, созданные приложениями типа cCreatorType. Если в качестве cFileExtensions задан шаблон имен, в прокручиваемом списке отображаются файлы, соответствующие этому шаблону и созданные приложениями типа, заданного в аргументе cCreatorType.
Результат:
Символьный.
Комментарии:
Если выйти из диалогового окна Open, нажав клавишу Esc или кнопку Cancel или выбрав Close из меню Control, функция GETFILE( ) возвратит пустую строку.
Пример:
CLOSE DATABASES
SELECT 0
gcTable = GETFILE('DBF', 'Browse or Create a .DBF:', 'Browse',1)
DO CASE
CASE 'Untitled' $ gcTable
CREATE (gcTable)
CASE EMPTY(gcTable)
RETURN
OTHERWISE
USE (gcTable)
BROWSE
ENDCASE