0
Ma3eIIa
19.02.16
✎
08:33
|
При попытки указать ПутьКДанным пишет ошибка. Если закомментривароть. то все создается. элементы на форме есть. что не так ?
Для каждого ТекСвойство Из ТЗСвойств Цикл
МассивТипов = Новый Массив;
МассивТипов.Добавить(Тип("СправочникСсылка.ЗначенияСвойствОбъектов"));
СпЗн_Объект = Новый СписокЗначений;
нРеквизиты = Новый Массив;
ИдОбъекта = "qdСпЗн"+СтрЗаменить(ВРег(Строка(ТекСвойство.Свойство.УникальныйИдентификатор())), "-", "x");
Реквизит = Новый РеквизитФормы(ИдОбъекта, Новый ОписаниеТипов(МассивТипов), , ТекСвойство.Свойство.Заголовок, Истина);
нРеквизиты.Добавить(Реквизит);
ИзменитьРеквизиты(нРеквизиты);
ЭлементГруппа = Элементы.Добавить("qdГруппа_"+ИдОбъекта, Тип("ГруппаФормы"), Элементы.qdГруппаМножественныеРеквизиты);
ЭлементГруппа.Заголовок = ТекСвойство.Свойство.Заголовок;
ЭлементГруппа.Вид = ВидГруппыФормы.ОбычнаяГруппа;
ЭлементСпЗн = Элементы.Добавить(ИдОбъекта, Тип("ТаблицаФормы"), ЭлементГруппа);
ЭлементСпЗн.КоманднаяПанель.Видимость = Ложь;
ЭлементСпЗн.КонтекстноеМеню.Видимость = Ложь;
//ЭлементСпЗн.ПутьКДанным = ИдОбъекта;
НовыйЭлемент = Элементы.Добавить("Пометка", Тип("ПолеФормы"),ЭлементСпЗн);
НовыйЭлемент.Вид = ВидПоляФормы.ПолеФлажка;
//НовыйЭлемент.ПутьКДанным = ИдОбъекта + "Пометка";
НовыйЭлемент = Элементы.Добавить("Значение", Тип("ПолеФормы"),ЭлементСпЗн);
НовыйЭлемент.Вид = ВидПоляФормы.ПолеВвода;
//НовыйЭлемент.ПутьКДанным = ИдОбъекта + "Значение";
КонецЦикла;
|
|