Диалоговое окно для выбора файла

User

Сообщений: 3170 Регистрация: 08.11.2007

Красноярск

09.06.2008 14:52:13

С помощью какой функции можно реализовать диалог для выбора файла? Я думаю лучше по типу, как окно через которое выбирается в версии Б5 3.4 выбирается файл с плагином по Ctrl-F5. Вроде была уже подобная тема, но не могу найти ...

P.S. Б5 3.4 СП6

Денис User Сообщений: 3170 Регистрация: 08.11.2007 Красноярск	#2 24.06.2008 05:24:33 ??

Алексей Новиков User Сообщений: 872 Регистрация: 11.10.2007 Пермь	#3 24.06.2008 07:24:49 Добрый день. PopFile(,cPath,cMask,cMessage,cFormats) cMask - ".txt;.dbf" cFormats - {{"Текстовые файлы",".txt"}, {"Базы данных",".dbf"}, {"Все файлы","."}} Назначение остальных параметров науке неизвестно. С уважением, Новиков Алексей.

Александр Титов

Administrator

Сообщений: 810 Регистрация: 29.10.2007

Москва, Компания "БЭСТ"

24.06.2008 08:11:05

Цитата
Алексей Новиков пишет: Добрый день. PopFile(,cPath,cMask,cMessage,cFormats) cMask - ".txt;.dbf" cFormats - {{"Текстовые файлы",".txt"}, {"Базы данных",".dbf"}, {"Все файлы","."}} Назначение остальных параметров науке неизвестно.

Вот что говорит наука

PopFile(cFileName, cPath, cMask, cTitle, aFileFilter)
cFileName - начальное имя (куда позиционироваться при вызове диалогв)
Пример aFileFilter:
{;
{"<Таблицы DBF>","*.dbf"};
{"<Таблицы Excel>","*.xls"},;
{"<Все файлы>","*.*"};
}

Денис

User

Сообщений: 3170 Регистрация: 08.11.2007

Красноярск

25.06.2008 04:20:07

Спасибо! Все получилось, кроме:

Цитата
cFileName - начальное имя (куда позиционироваться при вызове диалогв)

Вот такой простой пример:

Код

Local cFileNameGorod
Local cPath := "C:\Bests"
Local cMask := "*.txt;*.dbf"
Local cFormats := {{"Текстовые файлы","*.txt"}, {"Базы данных","*.dbf"}, {"Все файлы","*.*"}}
Local cFileName := "readme.txt"
// Пробовал и Local cFileName := "c:\bests\readme.txt"
Local cMessage := "Выбор файла"

cFileNameGorod := PopFile(,cPath,cMask,cMessage,cFormats)

If Empty(cFileNameGorod)
  SayAndWait("Не выбран файл")
Else
  SayAndWait(cFileNameGorod)
EndIf

Или я не правильно понял слово "позиционироваться" или в диалоге курсор должен стоять на файле readme.txt

Алексей Новиков User Сообщений: 872 Регистрация: 11.10.2007 Пермь	#6 25.06.2008 08:21:49 Правильно. Но я же сразу предупредил, что назначение этого параметра науке неизвестно. Ведь наука - это не только теория, но ещё и практика. :-) С уважением, Новиков Алексей.

Форум