Вход | Регистрация
 
1С:Предприятие :: 1С:Предприятие 7.7 и ранее

v7: Подскажите как Епрст вывел QR код в табличную часть?

v7: Подскажите как Епрст вывел QR код в табличную часть?
Я
   sysadminlk
 
10.11.20 - 17:22
https://yadi.sk/d/GasS4vdzRiaQ-Q
вот обработка которую он где-то тут на форуме представил
установив библиотеки с горем пополам она заработала
но сделать аналогичную не получается, не понятно как QR код появляется в табличной части
но при открытии ругается что класс не зарегистрирован, я так понял что где-то в обработку можно встраивать какие-то классы что-ли?
   mikecool
 
1 - 10.11.20 - 17:25
не смотрел, но если каласс не заранистирован - то надо регистрировать библиотеку, поставляющую этот класс
   mikecool
 
2 - 10.11.20 - 17:26
а вообще Ёпрст - маг и чародей ))
   asady
 
3 - 10.11.20 - 17:34
(0) посмотри в таблицу (макет)
   ChMikle
 
4 - 10.11.20 - 17:44
Barcode.ocx зарегистрируй а в табличном документе добавьте объект соответствующий Barcode Так вроде
   sysadminlk
 
5 - 10.11.20 - 17:45
(4) в табличном документе добавьте объект соответствующий Barcode
это не понятно
   ChMikle
 
6 - 10.11.20 - 17:51
Octiva.Barcode зарегистрировали ?
в макете есть такой пункт меню вставить рисунок , выбираете объект и тип объекта Octiva.Barcode . ЕМНП
   ChMikle
 
7 - 10.11.20 - 17:55
Ну что , нашли ?
   sysadminlk
 
8 - 10.11.20 - 17:56
(0) нашел, оказалось всё норм, почему-то в той конфигурации в которой тестировал картинка эта не отображалась
очень странно
открыл в другой конфигурации и стало всё видно и понятно ))))
   ChMikle
 
9 - 10.11.20 - 17:57
(8) Семен Семеныч... :)
   sysadminlk
 
10 - 10.11.20 - 18:02
в это время нарыл что в формекс уже сразу можно qr коды делать
Перем Сервис;

Процедура Сформировать()
    Сервис = СоздатьОбъект("Сервис");
    Сервис.НарисоватьШтрихкод(кнКартинкаТМП, 58, "Тест кода на форме");
    
    Картинка = СоздатьОбъект("Картинка");
    Сервис.НарисоватьШтрихкод(Картинка, 58, "Тест кода в картинке");
    //Катринка.Сохранить(КаталогПользователя() + "qr.bmp");

    кнКартинка.УстановитьКартинку(Картинка);
    Таб = СоздатьОбъект("Таблица");
    Таб.Вывести();
    Таб.Показать("");
КонецПроцедуры

Функция ТестВыводаКартинки(Объект)
    Сервис.НарисоватьШтрихкод(Объект, 58, "Тест кода в таблице");
КонецФункции// ТестВыводаКартинки



Но почему-то когда сканируешь то сканер кириллицу не понимает
там абракадабра с латиницей все норм
   sysadminlk
 
11 - 10.11.20 - 18:04
   sysadminlk
 
12 - 10.11.20 - 18:05
(11) тут написано Методанные Q

а в латинице Методанные M
   Злопчинский
 
13 - 10.11.20 - 19:08
если бы ты юзал решения по маркировке от victuan1 - ты бы гораздо раньше обнаружил что куер можно формексом выводить

Список тем форума
Рекламное место пустует  Рекламное место пустует
ВНИМАНИЕ! Если вы потеряли окно ввода сообщения, нажмите Ctrl-F5 или Ctrl-R или кнопку "Обновить" в браузере.