1С. Программное добавление и удаление реквизитов формы
При разработке решений возникает необходимость добавить реквизит формы, состав и типы которых зависят от данных. Например при построении динамических деревьев с периодами, или при выводе контактной информации и т.д.
Задача
Для наглядности разберем простой пример, в котором можно было обойтись только элементами формы, но мы создадим и реквизиты.
Есть некая конфигурация, в форме элемента справочника Номенклатура необходимо программно создавать реквизиты формы и элементы к ним:
Элементы объединить в группу с горизонтальной группировкой. На текущий момент форма имеет следующий вид:
Добавление реквизитов
В обработчике формы ПриСозданииНаСервере() опишем код, который разбивается на 3 этапа:
Ниже приведен готовый код, код снабжен комментариями и разбит на области для лучшего понимания
После выполнения приведенного кода форма будет выглядеть так:
Удаление реквизитов
Для удаления необходимо передать массив содержащий пути реквизитов в качестве второго параметра метода формы ИзменитьРеквизиты().
Внимание. Удалять можно только реквизиты созданные программно.
Добавление реквизита табличной части
Добавление реквизита и элемента формы для табличной части почти ничем не отличается, необходимо только указать путь «Объект. ». Ниже пример добавления реквизита Ячейка в ТЧ Комплектация.
Добавление реквизита с типом Произвольный
В одной из задач стало необходимо добавить реквизит с типом Произвольный, но ни СП, ни интернеты ответа не дали. В итоге через несколько попыток было найдено решение
Внимание. Данные добавленного реквизита сохраняться в ИБ не будут.
Заметки программиста 1с
понедельник, 7 мая 2018 г.
Программное добавление реквизитов на форму
Чтобы вывести реквизиты на форму программно нужно в обработчике «ПриСозданииНаСервере» в форме выполнить следующий алгоритм:
Реквизит должен находится в метаданных.
Программное добавление поля ввода на форму:
//Программное создание реквизита на форме
Массив = Новый Массив;
Массив.Добавить(Новый РеквизитФормы(«Статус», Новый ОписаниеТипов(«Строка»)));
ИзменитьРеквизиты(Массив); //Изменяем массив содержащий реквизиты формы//Теперь добавим созданный нам реквизит на форму уже изученным способом программно
Поле = Элементы.Вставить(«Статус», Тип(«ПолеФормы»),Элементы.ГруппаРеквизиты,Элементы.СтранаПроисхождения);
Поле.ПутьКДанным = «Статус»;
Поле.Вид = ВидПоляФормы.ПолеВвода;
Чтобы подключить событие к созданному полю нужно создать процедуру и подключить ее к полю:
*Процедура команды обязательно должна выполняться в директиве компиляции «&НаКлиенте»
НашаКоманда = Команды.Добавить(«НашаКоманда»);
НашаКоманда.Действие = «НашаКомандаПроцедура»; //Указываем имя процедуры на клиенте
//которую будет вызывать команда
Кнопка = Элементы.Вставить(«НашаКоманда», Тип(«КнопкаФормы»));
Кнопка.ИмяКоманды = «НашаКоманда»;
Кнопка.Вид = ВидКнопкиФормы.ОбычнаяКнопка;
3 комментария:
Если Форма.ИмяФормы = «Справочник.Номенклатура.Форма.ФормаЭлемента» Тогда
//Добавляем новые реквизиты
НовыеРеквизиты = Новый Массив;
НовыйРеквизит = Новый РеквизитФормы(«мзКодМАНоменклатуры», Новый ОписаниеТипов(«Число»),, «Код МА Номенклатуры»);
НовыйЭлемент = Форма.Элементы.Вставить(«мзКодМАНоменклатуры», Тип(«ПолеФормы»), Форма.Элементы.ГруппаЗаголовокДополнительныеРеквизиты);
НовыйЭлемент.ПутьКДанным = «Объект.мзКодМАНоменклатуры»;
НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода;
КонецЕсли;