1
Smallrat
09.12.16
✎
13:41
|
&НаКлиенте
Процедура КаталогXMLНачалоВыбора(Элемент, ДанныеВыбора, СтандартнаяОбработка)
ДиалогВыбораФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.ВыборКаталога);
ДиалогВыбораФайла.Фильтр = "Каталог выгрузки";
ДиалогВыбораФайла.Заголовок = НСтр("ru = 'Выберите каталог выгрузки'");
ДиалогВыбораФайла.ПредварительныйПросмотр = Ложь;
ДиалогВыбораФайла.ИндексФильтра = 0;
ДиалогВыбораФайла.ПолноеИмяФайла = Элемент.ТекстРедактирования;
ДиалогВыбораФайла.ПроверятьСуществованиеФайла = Истина;
ОповещениеВыбора = Новый ОписаниеОповещения("ОкончаниеВыбораКаталогXML", ЭтотОбъект);
ДиалогВыбораФайла.Показать(ОповещениеВыбора);
КонецПроцедуры
&НаКлиенте
Процедура ОкончаниеВыбораКаталогXML(ВыбранныеФайлы, Параметры) Экспорт
Если ВыбранныеФайлы <> Неопределено Тогда
КаталогXML = ВыбранныеФайлы[0];
КонецЕсли;
КонецПроцедуры
|
|