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