Записать несколько значений в ячейку табличной части
Создаем реквизит, добавляем на форму
Добавляем процедуру на нажатие. Но не ячейки, а на таблицу
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 |
Процедура Расш_ТабВыборПосле(Элемент, ВыбраннаяСтрока, Поле, СтандартнаяОбработка) // Настраиваем правило для нужной ячейки, т.к. двойной клик срабатывает на всю таблицу Если Элементы.Расш_Таб.ТекущийЭлемент.Заголовок = "Принадлежность" Тогда // задаём переменные ЗначениеПринадлежности = ""; Символ = ""; // список значений Принадлежность = Новый СписокЗначений; Принадлежность.Добавить("А"); Принадлежность.Добавить("Б"); Принадлежность.Добавить("В"); // выбор элементов ВыбранноеЗначение = Принадлежность.ОтметитьЭлементы("Выберите принадлежность"); // собираем отмеченные элементы в строку Для каждого Значение Из Принадлежность Цикл Если Значение.Пометка Тогда ЗначениеПринадлежности = ЗначениеПринадлежности + Символ + Значение; Символ = ", "; КонецЕсли; КонецЦикла; // Заносим полученную строку в ячейку Элементы.Расш_Таб.ТекущиеДанные.Принадлежность = ЗначениеПринадлежности; КонецЕсли; КонецПроцедуры |
Настраиваем нужный вид документа
|
1 2 |
Элементы.ТабПринадлежность.Видимость = Истина; Элементы.ТабПринадлежность.РедактированиеТекста = Ложь; |
Проверяем
Комментарии закрыты