PDA

Просмотр полной версии : Вывод штрих-кода в печатную форму



Mexxe
24.02.2017, 16:18
Добрый День! Помогите пожалуйста разобраться в чем проблема с выводом штрихкода в печатную форму, как текст(через параметр), без проблем выводится, а на рисунке не хочет ни как, подскажите ПРОФИ, новичку пожалуйста что не правильно делаю?
1.Внешняя печатная форма.
2.Получение через запрос.
3.Код вот такой

| ЗаказПокупателя.Штрихкод
|ИЗ
| Документ.ЗаказПокупателя КАК ЗаказПокупателя
| ЛЕВОЕ СОЕДИНЕНИЕ Справочник.Клиенты КАК Клиенты
| ЛЕВОЕ СОЕДИНЕНИЕ РегистрСведений.ДанныеКли� �нта.СрезПоследних(, Клиент = &Клиент) КАК ДанныеКлиентаСрезПоследни х
| ПО Клиенты.Ссылка = ДанныеКлиентаСрезПоследни х.Клиент
| ПО ЗаказПокупателя.КлиентЗак� �зчик = Клиенты.Ссылка
|ГДЕ
| Клиенты.Ссылка = &Клиент";

Запрос.УстановитьПараметр("Клиент",СсылкаНаОбъект.КлиентЗака зчик);
Выборка = Запрос.Выполнить().Выбрать() ;


КомпонентаШтрихКодировани я = Неопределено;
Попытка
КомпонентаШтрихКодировани я = Новый COMОбъект("V8.Barcod");
Исключение
Сообщить("Компонента для печати штрихкодов не установлена!");
КонецПопытки;

Если КомпонентаШтрихКодировани я <> Неопределено Тогда
ТипКода = УправлениеРозничнойТоргов лей.ПолучитьЗначениеТипаШ� �рихкодаДляЭУ(ПланыВидовХа рактеристик.ТипыШтрихкодо� �.EAN13);
Область.Рисунки.Штрихкод.О� �ъект.ТипКода = ТипКода;

Область.Рисунки.Штрихкод.О� �ъект.Сообщение = ?(ЗначениеЗаполнено(Штрихк� �д),Штрихкод,"");
Область.Рисунки.Штрихкод.О� �ъект.ТекстКода = Штрихкод;
КонецЕсли;

ТабДок.Вывести(Область);


Рисунок имя как "ШтрихКод"

Что не правильно делаю подскажите пожалуйста

Анатолик
01.03.2017, 00:50
На старых версиях надо на комп установить программулину для печати ШК, называется "1CBarCode". Для новый версий 1С в конфигурации присутствует компонента "Общие - Общие макеты - КомпонентаПечатиШтрихкодо в". И вообще то не как текст а как "Рисунок.Картинка". Вот пример получения ШК с встроенной в конфу компонентой:
Рисунок.Картинка = МенеджерОборудованияВызов Сервера.ПолучитьКартинкуШ� �рихкода(ПараметрыШтрихкод а);
Копай в этом направлении!

Mexxe
26.03.2017, 11:06
На старых версиях надо на комп установить программулину для печати ШК, называется "1CBarCode". Для новый версий 1С в конфигурации присутствует компонента "Общие - Общие макеты - КомпонентаПечатиШтрихкодо в". И вообще то не как текст а как "Рисунок.Картинка". Вот пример получения ШК с встроенной в конфу компонентой:
Рисунок.Картинка = МенеджерОборудованияВызов Сервера.ПолучитьКартинкуШ� �рихкода(ПараметрыШтрихкод а);
Копай в этом направлении!
Спасибо все получилось!