Имя: Пароль:
1C
1C 7.7
v7: Выбор каталога
0 Seriy
 
07.10.11
09:58
1С 7.7
Нужно разместить на форме поле с кнопкой выбора. Чтобы по нажатию этой кнопки выбирался каталог и отображался в этом поле.

Разместил на форме элемент "Поле ввода"
тип - "Строка",
длина - 200,
идентификатор - "КаталогДляВыгрузки",
отметил галочку "Имеет кнопку выбора"

В модуле написал процедуру:

Процедура ПриНачалеВыбораЗначения(КаталогДляВыгрузки)
   ИмяПути = КаталогДляВыгрузки;
   Если ФС.ВыбратьКаталог(ИмяПути,"Выберите каталог выгрузки")=1 Тогда
       КаталогДляВыгрузки = ИмяПути;
   КонецЕсли;
   Сообщить(КаталогДляВыгрузки);
КонецПроцедуры

Запускаю, проверяю - по нажатию на кнопку выбора каталог выбирается, сообщение с каталогом показывается, а в моем поле НЕ ОТОБРАЖАЕТСЯ. Как быть ? ))
1 Rie
 
07.10.11
10:00
(0) КаталогДляВыгрузки - зачем в параметры засунул? Убери.
2 filh
 
07.10.11
10:01
(0) а больше на форме не будет полей для ввода или еще чего? А то...
3 Seriy
 
07.10.11
10:01
(1) в параметры процедуры что ли? убрал. теперь так:
Процедура ПриНачалеВыбораЗначения()
   ИмяПути = КаталогДляВыгрузки;
   Если ФС.ВыбратьКаталог(ИмяПути,"Выберите каталог выгрузки")=1 Тогда
       КаталогДляВыгрузки = ИмяПути;
   КонецЕсли;
   Сообщить(КаталогДляВыгрузки);
КонецПроцедуры

все равно не отрабатывает
4 Seriy
 
07.10.11
10:03
(2) спасибо за совет. "а то..." сработало ))
как сделать то?
5 KUBIK
 
07.10.11
10:03
(0) В типовых глянуть как реализовано, религия позволяет?
6 catena
 
07.10.11
10:04
Процедура ПриНачалеВыбораЗначения(Что)
Если Что = "КаталогДляВыгрузки" тогда
   ИмяПути = КаталогДляВыгрузки;
   Если ФС.ВыбратьКаталог(ИмяПути,"Выберите каталог выгрузки")=1 Тогда
       КаталогДляВыгрузки = ИмяПути;
   КонецЕсли;
   Сообщить(КаталогДляВыгрузки);
КОнецЕсли;
КонецПроцедуры

вроде так же...
7 Rie
 
07.10.11
10:05
(3) КаталогДляВыгрузки - идентификатор поля на форме?
Параметры ПриНачалеВыбораЗначения - смотри в СП.
8 Seriy
 
07.10.11
10:09
Все, заработало. Спасибо catena (6). Мой косяк был
AdBlock убивает бесплатный контент. 1Сергей