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