Имя: Пароль:
1C
1С v8
Как программно указать размер страницы ТД?
0 espanol
 
19.11.12
18:15
нужен размер 3 на 2 см, подскажите плиз?
1 espanol
 
19.11.12
18:15
ТабличныйДокумент.РазмерСтраницы          = "3x2";
так не прокатывает
2 Reset
 
19.11.12
18:17
ВысотаСтраницы
ШиринаСтраницы
3 espanol
 
19.11.12
18:22
(2) я задавал, но не срабатывает почемуто...

Процедура КнопкаВыполнитьНажатие(Кнопка)
   
   ТабличныйДокумент                 = Новый ТабличныйДокумент;
   Макет                             = ПолучитьМакет("Макет");
   ОбластьМакета                     = Макет.ПолучитьОбласть("Шапка");
   ШтрихКод_                         = Обработки.Код128.Создать().Код_128("703887");//6 последних цифр цифр VIN
   ОбластьМакета.Параметры.ШтрихКод_ = ШтрихКод_;
   ОбластьМакета.Параметры.VIN       = "XTA210430X0703887";
   
   ТабличныйДокумент.ОриентацияСтраницы = ОриентацияСтраницы.Ландшафт;
   ТабличныйДокумент.АвтоМасштаб        = Истина;
   ТабличныйДокумент.ПолеСверху         = 0;
   ТабличныйДокумент.ПолеСлева          = 0;
   ТабличныйДокумент.ПолеСнизу          = 0;
   ТабличныйДокумент.ПолеСправа         = 0;
   ТабличныйДокумент.ОриентацияСтраницы      = ОриентацияСтраницы.Портрет;
   ТабличныйДокумент.РазмерКолонтитулаСверху = 0;
   ТабличныйДокумент.РазмерКолонтитулаСнизу  = 0;
   ТабличныйДокумент.ВысотаСтраницы          = 200;
   ТабличныйДокумент.ШиринаСтраницы          = 300;
   
   ТабличныйДокумент.Вывести(ОбластьМакета);
   ТабличныйДокумент.Показать();
   
КонецПроцедуры
4 espanol
 
19.11.12
18:30
ТабличныйДокумент.ВысотаСтраницы          = 20;
   ТабличныйДокумент.ШиринаСтраницы          = 30;
5 Шапокляк
 
19.11.12
18:37
Может, есть смысл сделать макет именно таких размеров и печатать в масштабе 100%? Еще вариант - померить макет и посчитать, какой масштаб надо брать, чтоб в нужном размере напечаталось?
Компьютеры — прекрасное средство для решения проблем, которых до их появления не было.