Народ! Блин никак не могу разобраться... Нужно на печатные формы некоторых документов присобачить Штрих-Код... Никогда ничем подобным не занимался, курю уже целый день. Ничего не получается.
В общем сгенерил я уникальный штрих-код для документа. с этим разобрался, но вот как его впихнуть на форму никак ума не приложу. Нашел в Демке "УП" Компоненты печати штрих кодов и процедуру которая возвращает картинку (правда очень медленно) пробую пихнуть эту картинку в пустую картину или параметр - картинка так и остается пустой, параметр пишет "Картинка" ((( Еще нашел 1CBarCod, но и с ней потерпел неудачу (нужно сказать, вообще не разобрался) создаю объект 1CBarCod.dll на форме называю ШК а что туда помещать надо? Текст или картинку ? Как ?

"создаю объект 1CBarCod.dll на форме называю ШК а что туда помещать надо"
туда ничего помещать не надо, в программном коду пиши следующее

   РисунокШтрихКод = ОбластьШтрихКода.Рисунки.ШК;
   РисунокШтрихКод.Объект.ТипКода   = 3; //CODE39
   РисунокШтрихКод.Объект.Сообщение = ШтрихКод;

(1) коду = коде

+(1) Естветственно что сам объект 1CBarCode должен быть в области ОбластьШтрихКода табличного документа

Пробовал. Мне пишет:
{Документ.Рейс.МодульМенеджера(61)}: Значение не является значением объектного типа (ТипКода)
       РисунокШтрихКод.Объект.ТипКода   = 3; //CODE39

Блин что не так делаю ???

А не проще посмотреть печать этикеток или ценников?

Я сперва от этого и пошел... Даже получил картинку со штрих кодом... Писал выше( Как полученную картинку сунуть на макет ?

(4) ну убери эту строку, а тип кода на странице свойств объекта укажи
(7) Это не картинка - это объект.

EanGnivc
Шрифт

в инете ищем eang000.zip

самое простое

(9) алгоритм к нему на две страницы )

Нужели никто не печатает штрих-коды в 8.2 ? :-\\\\

Я печатаю. В 8.2. УТ 11. Использую алгоритм, позаимствованный из печати этикеток и ценников.

Кстати, 1CBarCod.dll в управляемом приложении лучше не использовать, так как это ActiveX

Всем спасибо! Вопрос снят !

(13) Я ведь в начале тоже правильно мыслить начал ))) А потом заморочился с этим 1CBarCod.... А вся фишка то была рядом совсем )

ОбластьШК.Рисунки.ШтрихКод.Картинка = ШтрихКод;
                           ^^^^^^^^ - тупо вначале забыл, и начал копать 1CBarCod ((((