Имя: Пароль:
1C
1С v8
Как вывести на печать штрихкод?
0 Rom_Kat
 
22.07.19
09:36
Компоненту установил, объект в область табличного документа добавил. Добавляю код на сервере

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

Но вот у свойства Объект значение Неопределено и ругается на отсутствие методов.

Как решить эту проблему?
1 Rom_Kat
 
22.07.19
10:07
Это не решается?
2 Rom_Kat
 
23.07.19
15:25
Попытка
                ОбластьСтрокаОбщий.Рисунки.EAN.Объект = Новый COMОбъект("V8.Barcod");
            Исключение
                Сообщить("Элемент управления не установлен");
                КомпонентШК = Неопределено;
            КонецПопытки;

            Если ОбластьСтрокаОбщий.Рисунки.EAN.Объект <> Неопределено Тогда
                Попытка
                    ОбластьСтрокаОбщий.Рисунки.EAN.Объект.ТипКода = 1;
                    ОбластьСтрокаОбщий.Рисунки.EAN.Объект.Сообщение = ШтрихКодНоменклатуры;
                    ОбластьСтрокаОбщий.Рисунки.EAN.Объект.ТекстКода = ШтрихКодНоменклатуры;
                Исключение
                    // Ошибка
                КонецПопытки;
            КонецЕсли;

не сработало
3 МихаилМ
 
23.07.19
15:28
4 Rom_Kat
 
23.07.19
15:40
(3) неужели )))
5 Rom_Kat
 
23.07.19
16:55
ОбъектМодуль = РеквизитФормыВЗначение("Объект");
        макет = ОбъектМодуль.ПолучитьМакет("КомпонентаПечатиDataMatrix");    
        адрес = ПоместитьВоВременноеХранилище(макет);
        Если ПодключитьВнешнююКомпоненту(адрес, "DM", ТипВнешнейКомпоненты.Native) Тогда
            DMCodeGenerator = Новый("AddIn.DM.Barcode");
        Иначе
            Сообщить(ТекстОшибки+ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
            Отказ = истина;
        КонецЕсли


Подключить компоненту пытаюсь, но выдаёт ошибку.