Попытка
ОбластьСтрокаОбщий.Рисунки.EAN.Объект = Новый COMОбъект("V8.Barcod");
Исключение
Сообщить("Элемент управления не установлен");
КомпонентШК = Неопределено;
КонецПопытки;
Если ОбластьСтрокаОбщий.Рисунки.EAN.Объект <> Неопределено Тогда
Попытка
ОбластьСтрокаОбщий.Рисунки.EAN.Объект.ТипКода = 1;
ОбластьСтрокаОбщий.Рисунки.EAN.Объект.Сообщение = ШтрихКодНоменклатуры;
ОбластьСтрокаОбщий.Рисунки.EAN.Объект.ТекстКода = ШтрихКодНоменклатуры;
Исключение
// Ошибка
КонецПопытки;
КонецЕсли;
ОбъектМодуль = РеквизитФормыВЗначение("Объект");
макет = ОбъектМодуль.ПолучитьМакет("КомпонентаПечатиDataMatrix");
адрес = ПоместитьВоВременноеХранилище(макет);
Если ПодключитьВнешнююКомпоненту(адрес, "DM", ТипВнешнейКомпоненты.Native) Тогда
DMCodeGenerator = Новый("AddIn.DM.Barcode");
Иначе
Сообщить(ТекстОшибки+ПодробноеПредставлениеОшибки(ИнформацияОбОшибке()));
Отказ = истина;
КонецЕсли
Подключить компоненту пытаюсь, но выдаёт ошибку.
Требовать и эффективности, и гибкости от одной и той же программы — все равно, что искать очаровательную и скромную жену... по-видимому, нам следует остановиться на чем-то одном из двух. Фредерик Брукс-младший