|
Поле табличного документа | ☑ | ||
---|---|---|---|---|
0
igniter
25.12.15
✎
14:03
|
Добрый день.
Хочу заполнять поле табличного документа в обработке. Первая колонка заполняется как надо. А вторая заполняется под данными первой. Как сделать что бы она была рядом с первой колонкой. Я так понимаю что нужно сместить текущую область табличного документа ЭлементыФормы.ПолеТабличногоДокумента.ТекущаяОбласть Сейчас она всегда R1C1:R1C1. Если я правильно понимаю как это сделать? |
|||
1
ICWiner
25.12.15
✎
14:05
|
Код покажи.
|
|||
2
igniter
25.12.15
✎
14:05
|
Процедура КнопкаВыполнитьНажатие(Кнопка)
ЭлементыФормы.ПолеТабличногоДокумента.Очистить(); Макет = ПолучитьМакет("Макет"); //ПеременныеДляРаботыСМакетом ШиринаКолонки = 5; ВысотаЯчейки = 8; // ТонкаяЛиния = Новый Линия(ТипЛинииРисункаТабличногоДокумента.Сплошная,1); ОбщаяТаблица = Новый ТаблицаЗначений; ОбщаяТаблица = ПолучитьДокументы(); ОбластьШапки = Макет.ПолучитьОбласть("R1C1:R1C1"); ОбластьШапки.Область(1,1,ВысотаЯчейки,ШиринаКолонки).Объединить(); ОбластьШапки.ТекущаяОбласть.Текст = "Подтвержденные"; ОбластьШапки.ТекущаяОбласть.ВертикальноеПоложение = ВертикальноеПоложение.Центр; ОбластьШапки.ТекущаяОбласть.ГоризонтальноеПоложение = ГоризонтальноеПоложение.Центр; ОбластьШапки.ТекущаяОбласть.Шрифт = Новый Шрифт("Arial",8,Истина,,,); ЭлементыФормы.ПолеТабличногоДокумента.Вывести(ОбластьШапки); НомерСтроки = 1; Для каждого ЗаказПокупателя из ОбщаяТаблица Цикл Если ЗаказПокупателя.р_Подтвержден = Истина Тогда НомерСтроки = НомерСтроки + 2; Область = Макет.ПолучитьОбласть("R"+Строка(НомерСтроки)+"C1:R"+Строка(Число(НомерСтроки))+"C1"); Область.Область(1,1,ВысотаЯчейки,ШиринаКолонки).Объединить(); Область.ТекущаяОбласть.ЦветФона = WebЦвета.СветлоЗеленый; // цвет фона объединенной ячейки Область.ТекущаяОбласть.Текст = Строка(ЗаказПокупателя.Ссылка) +" "+ Строка(ЗаказПокупателя.р_Подтвержден); Область.ТекущаяОбласть.Расшифровка = ЗаказПокупателя.Ссылка; Область.ТекущаяОбласть.ГраницаСнизу = ТонкаяЛиния; Область.ТекущаяОбласть.ГраницаСправа = ТонкаяЛиния; Область.ТекущаяОбласть.ВертикальноеПоложение = ВертикальноеПоложение.Центр; Область.ТекущаяОбласть.ГоризонтальноеПоложение = ГоризонтальноеПоложение.Центр; Область.ТекущаяОбласть.РазмещениеТекста = ТипРазмещенияТекстаТабличногоДокумента.Переносить; ЭлементыФормы.ПолеТабличногоДокумента.Вывести(Область); КонецЕсли; КонецЦикла; НомерСтроки = НомерСтроки - НомерСтроки + 1; Для каждого ЗаказПокупателя из ОбщаяТаблица Цикл Если ЗаказПокупателя.р_Подтвержден = Ложь Тогда НомерКолонки = 2; НомерСтроки = НомерСтроки + 2; Область = Макет.ПолучитьОбласть("R"+Строка(НомерСтроки)+"C"+Строка(Число((НомерКолонки-1)*ШиринаКолонки))+":R"+Строка(Число(НомерСтроки))+"C"+Строка(Число((НомерКолонки-1)*ШиринаКолонки))); Область.Область(1,1,ВысотаЯчейки,ШиринаКолонки).Объединить(); Область.ТекущаяОбласть.ЦветФона = WebЦвета.АкварельноСиний; // цвет фона объединенной ячейки Область.ТекущаяОбласть.Текст = Строка(ЗаказПокупателя.Ссылка) +" "+ Строка(ЗаказПокупателя.р_Подтвержден); Область.ТекущаяОбласть.Расшифровка = ЗаказПокупателя.Ссылка; Область.ТекущаяОбласть.ГраницаСнизу = ТонкаяЛиния; Область.ТекущаяОбласть.ГраницаСправа = ТонкаяЛиния; Область.ТекущаяОбласть.ВертикальноеПоложение = ВертикальноеПоложение.Центр; Область.ТекущаяОбласть.ГоризонтальноеПоложение = ГоризонтальноеПоложение.Центр; Область.ТекущаяОбласть.РазмещениеТекста = ТипРазмещенияТекстаТабличногоДокумента.Переносить; ЭлементыФормы.ПолеТабличногоДокумента.Вывести(Область); КонецЕсли; КонецЦикла; ЭлементыФормы.ПолеТабличногоДокумента.Показать(ЭлементыФормы.ПолеТабличногоДокумента); ЭлементыФормы.ПолеТабличногоДокумента.ТолькоПросмотр = Истина; КонецПроцедуры |
|||
3
igniter
25.12.15
✎
14:07
|
Область = Макет.ПолучитьОбласть("R"+Строка(НомерСтроки)+"C"+Строка(Число((НомерКолонки-1)*ШиринаКолонки))+":R"+Строка(Число(НомерСтроки))+"C"+Строка(Число((НомерКолонки-1)*ШиринаКолонки)));
это строка должна возвращать наверх и вправо |
|||
4
igniter
25.12.15
✎
14:10
|
значение "R3C5:R3C5"
|
|||
5
Mirnin
25.12.15
✎
14:12
|
"Присоединить" вместо "Вывести".
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |