helpf.pro
Регистрация

Не работает этикетка с штрих кодом

fox_haus
29.05.2011 23:59Прочитано: 6092
Код 1C v 8.2 УП
    

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


Если СтрокаТаблицы.Штрихкод = 0 Тогда
Сообщить("Штрихкод не найден! Сгенерируйте штрихкод для номенклатуры!: " + СокрЛП(СсылкаНаОбъект) + """.");
Отказ = Истина;
Иначе КомпонентШК.Сообщение = СтрокаТаблицы.ШтрихКод;
ОбластьЦенника.Рисунки.Штрихкод.Объект.ТипКода = 1; //EAN13
ОбластьЦенника.Рисунки.Штрихкод.Объект.Сообщение = КомпонентШК.Сообщение; //Сам Штрих код берется из табличной части обработки
Сообщить (""+строкаТаблицы.ШтрихКод+" "+ КомпонентШК.Сообщение);

причем последняя строка выдает правильный штрих код !!!

В чем тут проблема?
Yandex
Возможно, вас также заинтересует
Реклама на портале
E_Migachev
30.05.2011 09:28Ответ № 1
Вот рабочий пример:
Код 1C v 8.х
 //Инициализация компоненты 1С: Печать штрих кодов:
Если СтикерСодержитШК Тогда
//попытаемся создать объект Barcode
Попытка
КомпонентШК = Новый COMОбъект("V8.Barcod.1");
Исключение
Сообщить("Компонента 1С:Печать штрих-кодов не установлена на данном компьютере!", СтатусСообщения.Важное);
Возврат;
КонецПопытки;
КонецЕсли;

Вывод на печать:
Если СтикерСодержитШК Тогда
ОбластьСтикер.Рисунки.ШтрихКод.Объект.Сообщение = СтрокаТаблицы.ШК;
ОбластьСтикер.Рисунки.ШтрихКод.Объект.ТекстКода = СтрокаТаблицы.ШК;
КонецЕсли;

В области печати уже должен содержаться рисунок со вставленным объектом элемента управления 1C.V8.Печать штрихкодов.
fox_haus
30.05.2011 17:51Ответ № 2
Спасибо за сообщение. Но ошибка была ну очень глупая !!!!! Всем кто читает, будте внимательны когда вводите реквизиты (в частности у меня было 10 знаков !!!! вместо 13).
Подсказка: Для выделения Кода используйте (в редакторе).
Вы не можете отправить комментарий анонимно, пожалуйста войдите или зарегистрируйтесь.