Хочу реализовать печать этикеток для товар ...оказалось не всё просто.


Для примера допустим у нас есть товар с штих-кодом 22332232223.

Создал макет "МакетНаклейки" в который в область "Детали" разместил "Элемент управления 1С: Печать штрихкодов".

Для того чтобы код товара выглядил в виде штрих-кода нужно этому Элемнту управления пердеть картинку на которой будет штрих-код.

       
       ОбластьДетальныхЗаписей = Макет.ПолучитьОбласть("Детали");

       ОбластьДетальныхЗаписей.Рисунки.D1.Картинка =  ????ПолучитьКартинкуШтрихкода(?????;

Тоесть вопрос в том как из числа 22332232223 получить Двоичные данные картинки чтобы пердать в макет.

Может кто-то уже сталкивался с задачей?

По этой задаче нашол только вот необходимо зарегистрироваться для просмотра ссылки

Впервые слышу...
Может:

ОбластьДетальныхЗаписей.Рисунки.D1.Объект.Сообщение = "22332232223"

Так ничего не заработает. В управляемом приложении ОбластьДетальныхЗаписей.Рисунки.D1.Объект вообще не доступен (он доступен в толстом клиенте)

Есть вроде конфа розница на управляемых формах. Там должно быть.

Данный механизм не работает в управляемом интерфейсе.

Ищите: Внешняя компонента "КомпонентаПечатиШтрихкодов", она встраивается в 1С при помощи общих макетов.

Семен Семеныч! Не обратил внимание...


Там же, в приведенной Вами ссылке, все расписано.

делал не давно такое. за основу взял УТ 3.0

1. выполняем подключение компоненты там функция взять от туда код

 
ВнешняяКомпонента = Обработки.ОбработкаГдеХранитсяКомпонента.ПодключитьВнешнююКомпонентуПечатиШтрихк
ода()

( в обработке в макете лежит компонента)

2, Преобразовать Свой уникальный код в ШК
наподобе

ШестнадчатиричноеЧисло = СтрЗаменить(Строка(Ссылка.УникальныйИдентификатор()),"-","");
    Возврат ПреобразоватьИзШестнадцатиричнойСистемыСчисленияВДесятичноеЧисло(ШестнадчатиричноеЧисло);

3. передать ШК в компоненту которая и сформирует картинку
наподобе:

ВнешняяКомпонента.ЗначениеКода = Штрихкод;
    
// Сформируем картинку
ДвоичныеДанныеКартинки = ВнешняяКомпонента.ПолучитьШтрихкод();
    
// Если картинка сформировалась
Если ДвоичныеДанныеКартинки <> Неопределено Тогда
    // Формируем из двоичных данных
    ОбластьМакета.Рисунки.КартинкаШтрихкода.Картинка = Новый Картинка(ДвоичныеДанныеКартинки);
КонецЕсли;

з.ы. компоненты лежат в УТ 3.0 в обработке печать ценников и этикеток

как то так

В моей ссылке рассматривается пример где человек использует типовое решение.

И самая сложная чать а имено предалка цифр в картинку ложиться на встроенный в типовой механизм кусок софта.

У меня же конфигурация написана с нуля и в ней нужно реализовать печать.



Для программы на Delphi я эту задачу решил довольно быстро. И у меня на этикетках код товара печатает жирным сверху например 1203 и внизу этому же коду печатает штрих код 1203.

Так вод вопрос Внешней компаненте можно предавать код 1203 ?

Судя по названию функции ПреобразоватьИзШестнадцатиричнойСистемыСчисленияВДесятичноеЧисло(Шестнадчатиричн
оеЧисло)

если у меня есть готовое число которое должно быть внизу штрихкода ничего с этим кодом делать не надо . Логично?



Заранее спасибо

Для программы на Delphi я эту задачу решил довольно быстро. И у меня на этикетках код товара печатает жирным сверху например 1203 и внизу этому же коду печатает штрих код 1203.

Так вод вопрос Внешней компаненте можно предавать код 1203 ?

Судя по названию функции ПреобразоватьИзШестнадцатиричнойСистемыСчисленияВДесятичноеЧисло(Шестнадчатиричн
оеЧисло)

если у меня есть готовое число которое должно быть внизу штрихкода ничего с этим кодом делать не надо . Логично?

По вашей ссылке есть функция которая возвращает картинку

Функция ПолучитьКартинкуШтрихкода(ВнешняяКомпонента, Штрихкод, Ширина, Высота)

Передаете в нее подключенную компоненту, сам штрихкод, ширина, и высота картинки? Что конкретно не понятно?


Не надо. Передается просто число

Спасибо большое хотя бы уже чтото начинает проясняться

Ещё раз благодарю за помошь

Этикетка уже печатаеться на обычном принтере и считываеться сканером ... но на принтере этикеток пока не печатет (чистая этикетка )

Если из блокнота отправить на принтер этикеток пару букв - печатает?

Печатает но естествено не так как выглядет на экране.

приятель сказал что УТ3.0 есть кусок кода который прежде чем происходит печать считывает из принтера его праметры печати.
где это закопано вопрос.

А что ж приятель не сказал где этот кусок кода? А если не знает где, откуда он знает, что он есть?

А у приятеля спросить нельзя?