Имя: Пароль:
1C
 
УстановитьШрифт() Печать штрих-кодов
0 vza
 
04.04.08
10:46
Помогите, люди добрые.
Стоит задача изменить размер текста под штрих-кодом.
Испробовал следующие варианты:
В макете вставлен рисунок-объект "1С:Печать штрих-кодов" с именем "ШтрихКод". По умолчанию установлен шрифт "Microsoft Sans Serif" с размером 8.

1) в свойствах рисунка-объекта на закладке "Оформление" меняю размер шрифта на 5. На макете шрифт изменился, но при выводе на печать - все тот же, с размером 8.

2) пробую изменить шрифт рисунка методами компоненты

Компонент = Новый COMОбъект("V8.Barcod");
ОбластьМакета.Рисунки.ШтрихКод.Объект.Сообщение = ТекстШтрихКода;
ОбластьМакета.Рисунки.ШтрихКод.Объект.УстановитьШрифт(,6,,,,);
В "Отладчике" шрифт меняется, но при просмотре и на печати - все тот же, с размером 8.

3) пробую изменить шрифт и объекта и рисунка

Компонент = Новый COMОбъект("V8.Barcod");
Компонент.УстановитьШрифт(,6,,,,);
ОбластьМакета.Рисунки.ШтрихКод.Объект.Сообщение = ТекстШтрихКода;
ОбластьМакета.Рисунки.ШтрихКод.Объект.УстановитьШрифт(,6,,,,);

В "Отладчике" шрифт меняется, но при просмотре и на печати - все тот же, с размером 8.

Использование других шрифтов (Arial, Tahoma)
ОбластьМакета.Рисунки.ШтрихКод.Объект.УстановитьШрифт("Arial",6,,,,) не помогает.

ПОМОГИТЕ !!!!!!!!!!!!!!
1 ТелепатБот
 
гуру
04.04.08
10:46
2 vza
 
04.04.08
10:54
up
3 vza
 
04.04.08
11:23
up
4 alexnikp
 
04.04.08
11:34
ОблПеч.ТекущаяОбласть.Шрифт = Новый Шрифт(ИмяШрифта, РазмерШрифта, ЖирныйШрифт, НаклонныйШрифт, <Подчеркнутый>, <Зачеркнутый>);
5 Леха Дум
 
04.04.08
11:43
я решил свою проблемму: v8: v8: 1С:Печать штрих-кодов - траблы
6 vza
 
04.04.08
13:07
(5) Да единственный вариант, к сожалению. Спасибо
Глупец, лишенный способности посмеяться над собой вместе с другими, не сможет долго выносить программирование. Фредерик Брукс-младший