Имя: Пароль:
1C
1С v8
Не могу сделать нужный размер для печатной формы этикетки - 1С 8.2 УТП 1.2
0 helsik
 
29.05.18
10:21
Здравствуйте! Никак не могу сделать нужный размер для печатной формы этикетки. Я взял готовую обработку для печати этикетки, но там размер выводимой на печать этикетки вообще мне не подходит.. мне нужно (ширина 43мм * высота 25мм). Пробовал редактировать эту форму, но как-то совсем никак не выходит, т.е. столбцы я растянул уменьшил, по своим размерам и свиду все ок, а термопрнтер печатает длинную бороду из 15-этикеток с растянутой на них одной этикеткой. В настройках принтера выставлен размер 43*25мм и тестовая страница нормально выходит. Помогите подогнать размер печатной формы под термопринтер. Спасибо.
1 helsik
 
29.05.18
10:23
2 DrShad
 
29.05.18
10:24
лучше бы личку заполнил
тут не все знают что такое УТП )))
3 DrShad
 
29.05.18
10:31
и где в твоей обработке вычисляется размер табличного документа?
4 helsik
 
29.05.18
10:32
я думал что можно его через макет настроить, нашел статью в нете и по ней ровнял столбики макета.. выровнял, а печатает полную ж..
5 DrShad
 
29.05.18
10:34
(4) к сожалению через макет не настроить, ну только если методом проб и ошибок

но высоту и ширину в миллиметрах вполне можно подсчитать
6 helsik
 
29.05.18
10:37
ну я вроде как добился нужной высоты ширины через перетаскивание столбцов в макете, но на печать выводится вообще непонятно что.. половина строки названия на 1 этикетке, вторая половина названия на второй и т.п. почему оно так режет?
7 DrShad
 
29.05.18
10:44
(6) так у тебя же в свойствах ячейки стоит переносить текст
8 DrShad
 
29.05.18
10:44
вот и растягивает
9 helsik
 
29.05.18
10:59
поставил всюду "авто" уже чуть лучше, но всеравно не то, напечатало 9 пустых этикеток и на 2-х этикетках распечатало мой ценник.. https://drive.google.com/open?id=1rkCg8Rlp9E06mgEgQKqcNf4LUJIDYnJo
10 helsik
 
29.05.18
11:04
вот ссылка на измененную обработку https://drive.google.com/file/d/1R66DjwlBCr5IlO86ztjvlJ-ocqzE0JI4/view?usp=sharing
11 helsik
 
29.05.18
11:07
и вот не пойму, я перед отправкой на печать выбрал печатать "1 страницу", а оно всеравно погнало бороду из 11 этикеток...
12 helsik
 
29.05.18
11:15
через бартендер этикетки печатаются идеально, так что настройки принтера исключаю
13 helsik
 
29.05.18
15:15
ап
14 DrShad
 
29.05.18
15:17
(13) ну а страна то у тебя какая?
15 helsik
 
29.05.18
15:45
1С УТП Украина
16 DrShad
 
29.05.18
15:46
(15) это конфа )))
17 helsik
 
29.05.18
16:00
Украина страна, только как это относится к делу?
18 DrShad
 
29.05.18
16:08
тут вообще почти нет знатоков украинских конфигураций
19 Михаил Козлов
 
29.05.18
16:28
В типовых УТ 10.3 и КА 1.1 вроде все ОК. И размер 45х23 распространенный.
Код такой:
Макет                   = ПолучитьОбщийМакет("Этикетка");
    ЭтикеткаОбласть         = Макет.ПолучитьОбласть(1,1,4,2);
    ОбластьНоменклатура     = ЭтикеткаОбласть.Области.Номенклатура;
    ОбластьШтрихкод         = ЭтикеткаОбласть.Области.ОбластьШтрихкод;
    РисунокШтрихкод         = ЭтикеткаОбласть.Рисунки.Штрихкод;
    ОбластьЦена             = ЭтикеткаОбласть.Области.Цена;

    ОбластьНоменклатура.ВысотаСтроки = ВысотаЭтикетки * 2.65 * 0.3;
    ОбластьШтрихкод.ВысотаСтроки     = ВысотаЭтикетки * 2.65 * 0.5;
    РисунокШтрихкод.Расположить(ОбластьШтрихкод);
    ОбластьЦена.ВысотаСтроки         = ВысотаЭтикетки * 2.65 * 0.2;

    ЭтикеткаОбласть.Область(2,2,2,2).ШиринаКолонки = ШиринаЭтикетки*0.53;
20 helsik
 
31.05.18
09:05
upp
21 helsik
 
31.05.18
09:08
могу выделить небольшую компенсацию 5$ на вмз, тому кто доведет до ума обработку, пишите на почту chitor-po-jizni@mail.ru
22 DrShad
 
31.05.18
09:30
(21) нам твои копейки не нужны, сорри
23 helsik
 
31.05.18
13:07
говорите только за себя, и никто вас не заставляет получать "копейки" ...
24 ИС-2
 
31.05.18
13:11
так не получается?

ТабДок = Новый ТабличныйДокумент;
ТабДок.ШиринаСтраницы = 43;
ТабДок.ВысотаСтраницы = 23;

но с зебрами проблема - если выводить с предпросмотром, то размеры сбиваются. Поэтому печать надо сразу на принтер, без предпросмотра
25 helsik
 
01.06.18
10:33
попробовал, но как вывести сразу на принтер без отображения формы? пробовал так
        ТабДокумент.Напечатать(РежимИспользованияДиалогаПечати.НеИспользовать);
        ТабДокумент.Напечатать(истина);
26 helsik
 
01.06.18
10:34
выводит тоже самое что и раньше на печать только теперь сразу, и всеравно открывается форма предварительного просмотра.. так и не нашел где вырубить ее.
27 d4rkmesa
 
гуру
01.06.18
10:58
(0)
Примерно так:

ТабДокумент.ПолеСверху                = 0;
ТабДокумент.ПолеСлева                 = 0;
ТабДокумент.ПолеСнизу                 = 0;
ТабДокумент.ПолеСправа                = 0;
ТабДокумент.РазмерКолонтитулаСверху    = 0;
ТабДокумент.РазмерКолонтитулаСнизу    = 0;    
ТабДокумент.Автомасштаб         = Ложь;
ТабДокумент.РазмерСтраницы = "Custom";
ТабДокумент.ШиринаСтраницы = 43;
ТабДокумент.ВысотаСтраницы = 25;

Последние 3 строки решили все проблемы с зебрами.