|
Фильтр в диалоге выбора файла. Интерфейс "Такси" |
☑ |
0
termos
08.12.14
✎
00:31
|
Здравствуйте. В связи с отказом от модальных окон так и не могу разобраться каким образом накладывать фильтр на диалог выбора файла при выборе по варианту, который описывает Павел Чистов здесь:
Подскажите, пожалуйста, каким образом его установить. Заранее благодарю.
|
|
1
Wobland
08.12.14
✎
03:14
|
хорошо-то как. вижу подробные объяснения, подробных объяснений не понимаю
|
|
2
acanta
08.12.14
✎
03:16
|
коротко и ясно больше не объясняют.. только подробно и туманно.
|
|
3
termos
08.12.14
✎
13:46
|
(1) Хорошо, покажи, пожалуйста, где в статье указано каким образом наложить фильтр на расширение файла? Допустим, как это делается с ДиалогВыбораФайла.Фильтр.
|
|
4
ДенисЧ
08.12.14
✎
13:48
|
фд.Фильтр = "xls|*.xls|Все файлы|*.*"
Не работает?
|
|
5
termos
08.12.14
✎
13:53
|
(4) Там следующая реализация.
&НаКлиенте
Процедура ВыбратьИзображение(Команда)
Оповещение = Новый ОписаниеОповещения("ОбработатьВыборФайла", ЭтотОбъект);
НачатьПомещениеФайла(Оповещение,,,Истина,УникальныйИдентификатор);
КонецПроцедуры
&НаКлиенте
Процедура ОбработатьВыборФайла(Результат, Адрес, ВыбранноеИмяФайла, ДополнительныеПараметры) Экспорт
Если Не Результат Тогда
Возврат;
КонецЕсли;
Лого = Адрес;
КонецПроцедуры
|
|
6
termos
08.12.14
✎
13:54
|
(4) А в какой момент накладывать фильтр - разобраться не могу.
|
|
7
fly7
08.12.14
✎
13:58
|
(6) в момент
>>НачатьПомещениеФайла(Оповещение,,,Истина,УникальныйИдентификатор);
но там нет фильтров ((
|
|
8
Любопытная
08.12.14
✎
13:59
|
(6) ДиалогВыбораФайла не модальное окно, так что используйте его сначала, а потом уже можно НачатьПомещениеФайла, в которую передать адрес файла и в параметр Интерактивно установить Ложь
|
|
9
termos
08.12.14
✎
14:14
|
(8) Благодарю Вас! Сделал вот так.
&НаКлиенте
Процедура ВыбратьИзображение(Команда)
Диалог = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Открытие);
Диалог.Фильтр = "Изображение (*.jpg)|*.jpg";
Если Диалог.Выбрать() Тогда
Оповещение = Новый ОписаниеОповещения("ОбработатьВыборФайла", ЭтотОбъект);
НачатьПомещениеФайла(Оповещение,,Диалог.ПолноеИмяФайла,Ложь,УникальныйИдентификатор);
КонецЕсли;
КонецПроцедуры
&НаКлиенте
Процедура ОбработатьВыборФайла(Результат, Адрес, ВыбранноеИмяФайла, ДополнительныеПараметры) Экспорт
Если Не Результат Тогда
Возврат;
КонецЕсли;
Лого = Адрес;
КонецПроцедуры
|
|