Имя: Пароль:
1C
1С v8
Не выводится колонтитул
0 Balabass
 
14.04.12
04:10
Нужно вывести в Акт Сверки нижний колонтитул с Реквизитами, телефоном и прочим.
Делаю так:
   ТабДок = Новый ТабличныйДокумент;

   ТабДок.НижнийКолонтитул.Выводить = Истина;
   ТабДок.НижнийКолонтитул.НачальнаяСтраница = 1;
   ТабДок.НижнийКолонтитул.ТекстСлева = "Исполнитель: "+ Ответственный + " тел.: 8 (*****) *****";

При отладке видно - что в процедуру        УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, КоличествоЭкземпляров, НаПринтер, ОбщегоНазначения.СформироватьЗаголовокДокумента(ЭтотОбъект, ЭтотОбъект.Метаданные().Представление()), НепосредственнаяПечать);
передается ТабДок с параметром истинного нижнего колонтитула с моим текстом. Но при печати ничего нет.
Куда копать, подскажите?
1 Balabass
 
14.04.12
04:15
Прошел полностью по процедуре печати - колонтитул везде присутствует в параметрах. Но на печать не выводиться.
2 Balabass
 
14.04.12
04:16
Вопрос снят.
Оказалось что он выводиться при непосредственной печати.
Всем спасибо.
3 Balabass
 
14.04.12
07:17
Апну тему.
Проблема теперь такая
Вот код:

   ТабДок.НижнийКолонтитул.Выводить = Истина;
   ТабДок.НижнийКолонтитул.НачальнаяСтраница = 1;
   ТабДок.НижнийКолонтитул.ТекстСлева = "Трололо";
   ТабДок.НижнийКолонтитул.Шрифт = Новый Шрифт(,12,,,,) ;
   ТабДок.РазмерКолонтитулаСнизу = 30;
Установил 12 шрифт для колонтитула. Вроде бы и ширину его увеличил. НО! Печатается он настолько низкко - что надпись не влазит в границы печати. Т.е. ТРОЛОЛО написано только наполовину по высоте.
Как поднять колонтитул от низа страницы?
4 Balabass
 
14.04.12
09:01
Добавил в Текст Символы.ПС - непомогло. Колонтитул по-прежнему вне зоны печати.
5 Balabass
 
14.04.12
09:03
Вопрос решен.
Ширина Поля превысила ширину текста колонтитула.
6 Balabass
 
14.04.12
09:08
Может кому понадобиться

Вывод нижнего колонтитула

   ТабДок.НижнийКолонтитул.Выводить = Истина;
   ТабДок.НижнийКолонтитул.НачальнаяСтраница = 1;
   ТабДок.НижнийКолонтитул.ТекстСлева = "Исполнитель: "+ Ответственный;
   ТабДок.НижнийКолонтитул.Шрифт = Новый Шрифт(,12,,,,) ;
   ТабДок.ПолеСнизу = 20;