1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | 1C &НаСервере Процедура ДобавитьКолонкиВТаблицу(Форма, ТабличнаяЧасть) // Получаем реквизиты табличной части Для Каждого Реквизит Из ТабличнаяЧасть.Колонки Цикл // Создаем новый реквизит формы для колонки НовыйРеквизит = Новый РеквизитФормы(Реквизит.Имя, Реквизит.ТипЗначения, "Объект." + ТабличнаяЧасть.Имя); // Добавляем реквизит в форму ИзменитьРеквизиты(Новый Массив(НовыйРеквизит)); // Создаем элемент формы для отображения колонки ЭлементКолонки = Форма.Элементы.Добавить(ТабличнаяЧасть.Имя + Реквизит.Имя, Тип("ПолеФормы"), Форма.Элементы[ТабличнаяЧасть.Имя]); ЭлементКолонки.ПутьКДанным = "Объект." + ТабличнаяЧасть.Имя + "." + Реквизит.Имя; ЭлементКолонки.Заголовок = Реквизит.Имя; КонецЦикла; КонецПроцедуры |
Этот код добавляет колонки в таблицу формы для отображения существующих реквизитов табличной части документа. Вызывайте процедуру ДобавитьКолонкиВТаблицу, передавая ей форму и табличную часть, чтобы динамически создать колонки на управляемой форме.