Имя: Пароль:
1C
 
Как работать с колонтитулом
0 kasandra
 
04.04.08
08:13
Здравствуйте уважаемые эксперты.
Подскажите пожалуйста как в 8-ке выполнить настройку колонтитулов.
Мне необходимо вывести "Стр.1", "Стр.2" и т.д.

Я открыла макет, выбрала Таблица ->Настройки печати -> Колонтитулы.
Далее выбрала Нижний колонтитул выводить с первой страницы, справа и в окошке для "справа" установила курсор и нажала "Номера страниц" (кнопочку вверху). У меня появился текст: [&НомерСтраницы]
В модуле для процедуры печати я написала: ТабДокумент.НижнийКолонтитул.Выводить=Истина.
Но ничего не выводится.
Если можно то по шагам расскажите, а то запуталась совсем...
1 Скромный
 
04.04.08
08:51
А Вы там галочку рядом с надписью "выводить с" поставили?
2 kasandra
 
04.04.08
08:57
Конечно поставила. Я уже даже такой код написала в модуле печати:
ТабДокумент.НижнийКолонтитул.Выводить=Истина;
ТабДокумент.НижнийКолонтитул.НачальнаяСтраница=1;
ТабДокумент.НижнийКолонтитул.ТекстСправа ="[&НомерСтраницы]";

Может я как-то не правильно обозначила область - может надо на определенной ячейке встать?
И еще я вот не понимаю откуда идет заполнение параметра НомерСтраницы? Может его где-то как-то определять нужно?

Или этот код с выводом в каком-то определенном месте надо указывать?
3 and2
 
04.04.08
09:04
(2) Хороший код.
Теперь на просмотре и колонтитулы будут.
4 zbv
 
04.04.08
09:06
(3) не факт...
5 kasandra
 
04.04.08
09:09
Вот именно, что не на просмотре - не на бумаге их нет
6 zbv
 
04.04.08
09:10
(5) в каком месте формирования печ. формы код написан?
7 and2
 
04.04.08
09:13
РазмерКолонтитулаСнизу (HeaderSize
8 kasandra
 
04.04.08
09:13
Процедура "Печать" в самом конце:
УниверсальныеМеханизмы.НапечататьДокумент(ТабДокумент, КоличествоЭкземпляров, НаПринтер, ОбщегоНазначения.СформироватьЗаголовокДокумента(ЭтотОбъект, ЭтотОбъект.Метаданные().Представление()), Ссылка);
ТабДокумент.ВерхнийКолонтитул.Выводить=Истина;
ТабДокумент.ВерхнийКолонтитул.НачальнаяСтраница=1;
ТабДокумент.ВерхнийКолонтитул.ТекстСправа ="[&НомерСтраницы]";
9 and2
 
04.04.08
09:14
(5)ТабДокумент.РазмерКолонтитулаСнизу=10;
10 kasandra
 
04.04.08
09:14
Это я уже эксперементировала с верхним, но понятно, что одна малина
11 zbv
 
04.04.08
09:14
(8) т.е. после ТабДокумент.Показать() ?
12 and2
 
04.04.08
09:15
(5) Извини.
ТабДокумент.РазмерКолонтитулаСверху=10;
13 kasandra
 
04.04.08
09:20
Нет, это у меня как раз после.
А при просмотре получается они могут и не отображаться?
14 zbv
 
04.04.08
09:23
(13) сделай вывод колонтитулов перед вызовом процедуры НапечататьДокумент.
15 kasandra
 
04.04.08
09:23
Все равно не напечаталось!  =(
А на самом макете может что-то нужно нарисовать?
16 kasandra
 
04.04.08
09:24
Попробовала только что. Может область нужно задать какую-то... Не знаю что и придумать...
17 Kasper076
 
04.04.08
09:28
Размер нижнего поля должен быть больше размера колонтитула
18 zbv
 
04.04.08
09:29
(16) рабочий код. Смотри что у тебя не так:

ТабДокумент = Новый ТабличныйДокумент;
Макет = ПолучитьМакет("Макет");
ТабДокумент.Вывести(Макет);
ТабДокумент.НижнийКолонтитул.ВертикальноеПоложение = ВертикальноеПоложение.Низ;    
ТабДокумент.НижнийКолонтитул.НачальнаяСтраница = 1;
ТабДокумент.НижнийКолонтитул.ТекстВЦентре = "Страница [&НомерСтраницы] из [&СтраницВсего]";
ТабДокумент.НижнийКолонтитул.Выводить = Истина;
ТабДокумент.Показать();
19 and2
 
04.04.08
09:30
(18) попробуй после "Показать()" вставить :)
20 КонецЕсли
 
04.04.08
09:36
ТабДокумент.ВерхнийКолонтитул.Выводить=Истина;
ТабДокумент.ВерхнийКолонтитул.НачальнаяСтраница=1;
ТабДокумент.ВерхнийКолонтитул.ТекстСправа ="[&НомерСтраницы]";
ТабДокумент.РазмерКолонтитулаСверху=10;
НапечататьДокумент(ТабДокумент, КоличествоЭкземпляров, НаПринтер, СформироватьЗаголовокДокумента(ЭтотОбъект), Ссылка);


Всё работает. Колонтитул виден, есесно, только на предварительном просмотре.
21 КонецЕсли
 
04.04.08
09:38
Обращаю внимание на эту строчку:
ТабДокумент.РазмерКолонтитулаСверху=10;
или ручками в параметрах страницы указать