Как можно программно в печатную форму добавить пустую строку c последующим её заполением?

1. zoeh 31 18.12.24 11:06 Сейчас в теме
ДопТекст = СокрЛП(СведенияОДокументе.Документ.ДополнительнаяПодписьВШапкеСчета);
		Если ДопТекст<>"" Тогда 
			ТабличныйДокумент.ВставитьОбласть(ТабличныйДокумент.Область("R1"), ТабличныйДокумент.Область("R1"),
			ТипСмещенияТабличногоДокумента.ПоГоризонтали); 
			Обл = ТабличныйДокумент.Область(ТабличныйДокумент.ВысотаТаблицы-1,1,ТабличныйДокумент.ВысотаТаблицы,11);
			Обл.Объединить();
			Обл.ГраницаСлева = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСнизу = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСправа = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСверху= Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);

			ШрифтП = 10;

			Обл.Текст = ДопТекст;
			Обл.Шрифт = Новый Шрифт(, ШрифтП, Истина, , ,Истина ) ; 
			Обл.РазмещениеТекста  = ТипРазмещенияТекстаТабличногоДокумента.Переносить;
		КонецЕсли;

Показать


поле текст недоступно для записи
Найденные решения
4. zoeh 31 18.12.24 11:49 Сейчас в теме
(2) Спасибо за наводку все работает до меня дошло!!!!

ТабличныйДокумент.ВставитьОбласть(ТабличныйДокумент.Область("R1"), ТабличныйДокумент.Область("R1"),
			ТипСмещенияТабличногоДокумента.ПоГоризонтали); 
			Обл = ТабличныйДокумент.Область(1,1,2,11);//ТабличныйДокумент.ВысотаТаблицы-1,1,ТабличныйДокумент.ВысотаТаблицы,11);
			Обл.Объединить();
			Обл.ГраницаСлева = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСнизу = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСправа = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСверху= Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			//Если СтрДлина(СокрЛП(ПредставлениеПокупателя2))>185 Тогда
			//	ШрифтП = 8;
			//Иначе
			ШрифтП = 10;
			//КонецЕсли;
			Обл.Текст = ДопТекст
			//Обл.Шрифт = Новый Шрифт(, ШрифтП, Истина, , ,Истина ) ; 
			//Обл.РазмещениеТекста  = ТипРазмещенияТекстаТабличногоДокумента.Переносить;
Показать
Остальные ответы
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
2. nomad_irk 80 18.12.24 11:18 Сейчас в теме
(1) А если
Обл.Область(1, 1).Текст = ДопТекст;

?
3. zoeh 31 18.12.24 11:46 Сейчас в теме
(2)
Обл.Область(1, 1).Текст = ДопТекст

Метод объекта не обнаружен (Область)
4. zoeh 31 18.12.24 11:49 Сейчас в теме
(2) Спасибо за наводку все работает до меня дошло!!!!

ТабличныйДокумент.ВставитьОбласть(ТабличныйДокумент.Область("R1"), ТабличныйДокумент.Область("R1"),
			ТипСмещенияТабличногоДокумента.ПоГоризонтали); 
			Обл = ТабличныйДокумент.Область(1,1,2,11);//ТабличныйДокумент.ВысотаТаблицы-1,1,ТабличныйДокумент.ВысотаТаблицы,11);
			Обл.Объединить();
			Обл.ГраницаСлева = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСнизу = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСправа = Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			Обл.ГраницаСверху= Новый Линия(ТипЛинииЯчейкиТабличногоДокумента.Сплошная,1);
			//Если СтрДлина(СокрЛП(ПредставлениеПокупателя2))>185 Тогда
			//	ШрифтП = 8;
			//Иначе
			ШрифтП = 10;
			//КонецЕсли;
			Обл.Текст = ДопТекст
			//Обл.Шрифт = Новый Шрифт(, ШрифтП, Истина, , ,Истина ) ; 
			//Обл.РазмещениеТекста  = ТипРазмещенияТекстаТабличногоДокумента.Переносить;
Показать
Оставьте свое сообщение

Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот