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

1C 7.7

10.11.20

✎

17:22

https://yadi.sk/d/GasS4vdzRiaQ-Q
вот обработка которую он где-то тут на форуме представил
установив библиотеки с горем пополам она заработала
но сделать аналогичную не получается, не понятно как QR код появляется в табличной части
но при открытии ругается что класс не зарегистрирован, я так понял что где-то в обработку можно встраивать какие-то классы что-ли?

1 mikecool

10.11.20

✎

17:25

не смотрел, но если каласс не заранистирован - то надо регистрировать библиотеку, поставляющую этот класс

2 mikecool

10.11.20

✎

17:26

а вообще Ёпрст - маг и чародей ))

3 asady

10.11.20

✎

17:34

(0) посмотри в таблицу (макет)

4 ChMikle

10.11.20

✎

17:44

Barcode.ocx зарегистрируй а в табличном документе добавьте объект соответствующий Barcode Так вроде

5 sysadminlk

10.11.20

✎

17:45

(4) в табличном документе добавьте объект соответствующий Barcode
это не понятно

6 ChMikle

10.11.20

✎

17:51

Octiva.Barcode зарегистрировали ?
в макете есть такой пункт меню вставить рисунок , выбираете объект и тип объекта Octiva.Barcode . ЕМНП

7 ChMikle

10.11.20

✎

17:55

Ну что , нашли ?

8 sysadminlk

10.11.20

✎

17:56

(0) нашел, оказалось всё норм, почему-то в той конфигурации в которой тестировал картинка эта не отображалась
очень странно
открыл в другой конфигурации и стало всё видно и понятно ))))

9 ChMikle

10.11.20

✎

17:57

(8) Семен Семеныч... :)

10 sysadminlk

10.11.20

✎

18:02

в это время нарыл что в формекс уже сразу можно qr коды делать

Перем Сервис;

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

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

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

Но почему-то когда сканируешь то сканер кириллицу не понимает
там абракадабра с латиницей все норм

11 sysadminlk

10.11.20

✎

18:04

(10) https://yadi.sk/i/Md0rAp79uIuTfw - вот так

12 sysadminlk

10.11.20

✎

18:05

(11) тут написано Методанные Q

а в латинице Методанные M

13 Злопчинский

10.11.20

✎

19:08

если бы ты юзал решения по маркировке от victuan1 - ты бы гораздо раньше обнаружил что куер можно формексом выводить