Имя: Пароль:
1C
1С v8
Вывод на печать, не работает разделитель
0 Andrey4453
 
13.11.12
18:11
Добрый день. Есть задача разместить 4 ценника на листе. В результате выполнения кода выводится 2 этикетки сверху, и снизу листа свободное место. Если отключаю Таб.ВывестиГоризонтальныйРазделительСтраниц(); то забивает под завязку, без правильного переноса. Прошу помочь решить задачу, может кто уже с таким сталкивался.

//4 этикетки на лист
Если Номер = 1 Тогда
Таб.Вывести(ЭтикеткаОбласть);
Номер = Номер + 1;
ИначеЕсли Номер=2 Тогда
Таб.Присоединить(ЭтикеткаОбласть);
Таб.ВывестиВертикальныйРазделительСтраниц();
Номер = Номер + 1;
ИначеЕсли Номер=3 Тогда
Таб.Присоединить(ЭтикеткаОбласть);
Номер = Номер + 1;
ИначеЕсли Номер=4 Тогда
Таб.Присоединить(ЭтикеткаОбласть);
Таб.ВывестиГоризонтальныйРазделительСтраниц();
Номер = 1
КонецЕсли;
1 del123
 
13.11.12
18:30
Может так

Если Номер = 1 Тогда
Таб.Вывести(ЭтикеткаОбласть);
Номер = Номер + 1;
ИначеЕсли Номер=2 Тогда
Таб.Присоединить(ЭтикеткаОбласть);
Номер = Номер + 1;
ИначеЕсли Номер=3 Тогда
Таб.Вывести(ЭтикеткаОбласть);
Номер = Номер + 1;
ИначеЕсли Номер=4 Тогда
Таб.Присоединить(ЭтикеткаОбласть);
Таб.ВывестиГоризонтальныйРазделительСтраниц();
Номер = 1
КонецЕсли;
2 Andrey4453
 
13.11.12
18:45
Спасибо, заработало. Но не могу понять почему. Раньше когда не делал вертикального разделителя ценники становились в ряд в длину. Единственно с того момента убрал автомасштаб=истина. Но сейчас ставил его на место и все равно работает. объяснишь почему так? Очень интересно.
3 del123
 
13.11.12
18:55
Смотри внимательно сюда:

ИначеЕсли Номер=3 Тогда
Таб.Вывести(ЭтикеткаОбласть);

и посмотри, как у тебя было.
4 Andrey4453
 
14.11.12
09:10
Спасибо огромное