|
Ocvita Barcode запуск на сервере , Нужно помощь в запуске ocvita Barcode |
2 страниц
< 1 2
|
|
|
|
|
|
|
|
|
06.04.20, 11:45
|
Живет на форуме
Группа: Местный
Сообщений: 2710
Из: Проскуров
Спасибо сказали: 691 раз
Рейтинг: 669.9
|
посильней размахнуться ничего не меняется. точно так как подключали. еще вариант - цепляете Компоненту в общийМакет и оперируете ею через ПодключитьВнешнююКомпоненту. Тогда ее регистрировать не надо. (но работать она будет все-равно в пользовательском процессе)
Сообщение отредактировал sava1 - 06.04.20, 11:45
|
|
|
|
|
|
09.04.20, 12:28
|
Говорящий
Группа: Пользователи
Сообщений: 91
Из: Одесса
Спасибо сказали: 12 раз
Рейтинг: 14.4
|
Цитата(Vofka @ 05.04.20, 10:45)
Вот, например от Гугла Гугл уже прекратил доступ к этой функции. Цитата(cao0603 @ 06.04.20, 13:40)
помогите пожалуйста кодом Вот ленивый народ. Говорят же в БСП есть, нет разжуйте положите. [необходимо зарегистрироваться для просмотра ссылки] Код//--печать qr через компоненету 1С // Возвращает двоичные данные для формирования QR кода. // // Параметры: // QRСтрока - Строка - данные, которые необходимо разместить в QR-коде. // // УровеньКоррекции - Число - уровень погрешности изображения при котором данный QR-код все еще возможно 100% // распознать. // Параметр должен иметь тип целого и принимать одно из 4 допустимых значений: // 0(7% погрешности), 1(15% погрешности), 2(25% погрешности), 3(35% погрешности). // // Размер - Число - определяет длину стороны выходного изображения в пикселях. // Если минимально возможный размер изображения больше этого параметра - код сформирован не будет. // // Возвращаемое значение: // ДвоичныеДанные - буфер, содержащий байты PNG-изображения QR-кода. // // Пример: // // // Выводим на печать QR-код, содержащий в себе информацию зашифрованную по УФЭБС. // // QRСтрока = УправлениеПечатью.ФорматнаяСтрокаУФЭБС(РеквизитыПлатежа); // ТекстОшибки = ""; // ДанныеQRКода = УправлениеПечатью.ДанныеQRКода(QRСтрока, 0, 190, ТекстОшибки); // Если Не ПустаяСтрока(ТекстОшибки) // ОбщегоНазначенияКлиентСервер.СообщитьПользователю(ТекстОшибки); // КонецЕсли; // // КартинкаQRКода = Новый Картинка(ДанныеQRКода); // ОбластьМакета.Рисунки.QRКод.Картинка = КартинкаQRКода; // Функция ДанныеQRКода(QRСтрока, УровеньКоррекции, Размер) Экспорт Отказ = Ложь; ИмяВременногоФайла = ПолучитьИмяВременногоФайла("png"); ГенераторQRКода = КомпонентаФормированияQRКода(Отказ); Если Отказ Тогда Возврат Неопределено; КонецЕсли; Попытка ДвоичныеДанныеКартинки = ГенераторQRКода.GenerateQRCode(QRСтрока, УровеньКоррекции, Размер); Исключение ЗаписьЖурналаРегистрации(НСтр("ru='Формирование QR-кода';uk='Формування QR-коду'", ОбщегоНазначенияКлиентСервер.КодОсновногоЯзыка()), УровеньЖурналаРегистрации.Ошибка, , , ПодробноеПредставлениеОшибки(ИнформацияОбОшибке())); КонецПопытки;
Возврат ДвоичныеДанныеКартинки; КонецФункции
Функция КомпонентаФормированияQRКода(Отказ) ТекстОшибки = НСтр("ru='Не удалось подключить внешнюю компоненту для генерации QR-кода. Подробности в журнале регистрации.';uk='Не вдалося підключити зовнішню компоненту для генерації QR -кода. Подробиці в журналі реєстрації.'"); QRCodeGenerator = ОбщегоНазначения.ПодключитьКомпонентуИзМакета("QRCodeExtension", "ОбщийМакет.КомпонентаПечатиQRКода"); Если QRCodeGenerator = Неопределено Тогда ОбщегоНазначенияКлиентСервер.СообщитьПользователю(ТекстОшибки,,,, Отказ); КонецЕсли; Возврат QRCodeGenerator; КонецФункции
Процедура СформироватьQRАртикула(ТабДок,СтрокаШК,Параметры) Макет = ПолучитьОбщийМакет("ЭтикеткаQR"); Область = Макет.ПолучитьОбласть("ШКАртикула|Первый"); Рисунок = Область.Область("КартинкаQRАртикула"); Рисунок.Картинка = Новый Картинка(ПечатьШК.ДанныеQRКода(СтрокаШК,1,82)); ТабДок.Вывести(Область); КонецПроцедуры // СформироватьQR()
Сообщение отредактировал Vofka - 09.04.20, 13:06
|
|