|
УНФ 1.4 Форма искажается | ☑ | ||
|---|---|---|---|---|
|
0
1C2SS
09.07.13
✎
10:31
|
Пишу вот такой код:
УдаляемыеРеквизиты = новый массив; рекв=ЭтаФорма.ПолучитьРеквизиты(); Для Каждого эф из Элементы.Кромки.ПодчиненныеЭлементы Цикл Для Каждого рк из рекв Цикл Если эф.Имя = рк.Имя Тогда УдаляемыеРеквизиты.Добавить(рк.Имя); КонецЕсли; КонецЦикла; КонецЦикла; ИзменитьРеквизиты(,УдаляемыеРеквизиты); Для Каждого эф из Элементы.Кромки.ПодчиненныеЭлементы Цикл Элементы.Удалить(эф); КонецЦикла; //Создадим реквизиты Для ы=0 по ТаблицаКромок.Количество()-1 Цикл имя = ПолучитьИмяНоменклатурыБезВсякойВаты(ТаблицаКромок[ы].Кромка); рекв=новый Массив; рекв=ЭтаФорма.ПолучитьРеквизиты(); Если НайтиПоИмениВМассиве(рекв,имя)=Неопределено Тогда ДобавляемыеРеквизиты = Новый Массив; Реквизит = Новый РеквизитФормы(имя, Новый ОписаниеТипов("Строка"), ,имя, Истина); ДобавляемыеРеквизиты.Добавить(Реквизит); ИзменитьРеквизиты(ДобавляемыеРеквизиты); ЭтаФорма[Реквизит.Имя]=ТаблицаКромок[ы].Длина; результат = Элементы.Найти(имя); Если результат <> Неопределено Тогда Элементы.Удалить(результат); КонецЕсли; Элемент = ЭтаФорма.Элементы.Добавить(имя, Тип("ПолеФормы"), Элементы.Кромки); Элемент.ПутьКДанным = Реквизит.Имя; Элемент.РастягиватьПоГоризонтали=Истина; Элемент.Вид=ВидПоляФормы.ПолеВвода; Элемент.ГоризонтальноеПоложение = ГоризонтальноеПоложениеЭлемента.Право; Элемент.Заголовок = имя + " ,м"; //Элемент.Ширина = 40; Иначе ЭтаФорма[имя]=ТаблицаКромок[ы].Длина; КонецЕсли; КонецЦикла; В реквизиты добавляются номально. Но при этом вся форма становится какой то кривой. Сползают все элементы черт знает куда. В чем может быть проблема ? |
|||
|
1
1C2SS
09.07.13
✎
10:35
|
Это в документе заказ покупателя. В модуле формы.
|
| Форум | Правила | Описание | Секции | Поиск |