QR - код

[artgkx]

Clarion 6.3 , "Use Scan Copy Mode?" не нашел. В принципе все получается, смущает что в каталоге \APPData\Local\Temp\ создаются файлы CLAxxxx.tmp, которые не удаляются автоматически. А все время плодятся, по одному на каждый ClaRunExt.ImageToPNG(), т.е на каждый сформированный документ. А лицевых счетов тысячи. Спасибо за рекомендации, попробую на С10. А то что выложил, может кому-то и пригодится, как пример KREATORа по формированию QR кода.

[kreator]

Clarion 6.3 , "Use Scan Copy Mode?" не нашел.

Параметр появился, кажется, в C9.1. Можно попробовать сравнить код по формированию PDF в 6.3 и 10, и увидеть разницу. Но я бы время тратить не стал. С10 в руки и вперёд!

[Дед Пахом]

Я сейчас играюсь с PdfMake, возможности можно посмотреть здесь.

[Yufil]

А никто не победил вывод кириллицы в QrCode для List & Label? Я давно не пользовал, но интересно же...

[artgkx]

Clarion 6.3 Zint.exe лежит http://zint.org.uk При переводе в QRcode из строки сформированной в программе (сделанной на Clarion) на кириллице,
создается QRcod. Но потом из этого QR невозможно прочитать в строку. Проверяю https://www.qrrd.ru . Строка скопированная в Notepad++
отображается крякозябрами. При смене кодировки в Notepad++ не меняется. В то же время строка набранная в Notepad++ или в Блокноте кодируется и правильно распознается в https://www.qrrd.ru. При смене кодировки в Notepad++ на utf-8, перекодируется. Что-то с кодировкой в Clarion, а что не пойму? Уже задолбался. Прошу помощи у сообщества.

[Admin]

QRcode из строки сформированной в программе

Строку в Clarion (windows-1251) пробовали конвертировать в UTF-8 перед кодировкой?

[artgkx]

Конечно, и при помощи класса Cstr (Ufil), и при помощи самодельной. Вся проблема в том, что строка набранная в Notepad++ конвертируется в utf-8, и QR код сделанный из нее правильно расшифровывается. А строка из Clarion конвертируется, но QR код сделанный из нее правильно не расшифровывается. Почему???

[artgkx]

APP сделанная на C10. На примере может понятней. Zint.exe можно взять http://zint.org.uk.

[kreator]

Приведи код как в UTF переводишь. Скорее здесь засада.

[artgkx]

В примере есть.

Код: Выделить всё

! Start of "Local Data After Object Declarations"
! [Priority 4000]
res  CStr

 OF ?BUTTON1
      ThisWindow.Update()
      ! [Priority 5000]
      DosFileName = PATH()
      DosFileName = LONGPATH()
      DosFileName = CLIP(DosFileName)&'\out.png'  ! 
      !loc:TextIsx = ToUTF_8(loc:TextIsx)
      res.set(loc:TextIsx)
      res.toutf8
      !stop(DosFileName)
      !RUN('zint.exe -o '&DosFileName&' -b 58 -d "'&loc:TextIsx&'"',1) !vers=10
      RUN('zint.exe -o '&DosFileName&' -b 58 -d "'&res.s&'"',1)
      IF RUNCODE()
        CASE RUNCODE()
        OF 2
           MESSAGE('ZINT_WARN_INVALID_OPTION')    
        OF 5
          MESSAGE('ZINT_ERROR_TOO_LONG')  
        OF 6
          MESSAGE('ZINT_ERROR_INVALID_DATA')  
        OF 7
            MESSAGE('ZINT_ERROR_INVALID_CHECK')
        OF 8
            MESSAGE('ZINT_ERROR_INVALID_OPTION')
        OF 9
            MESSAGE('ZINT_ERROR_ENCODING_PROBLEM')
        OF 10
            MESSAGE('ZINT_ERROR_FILE_ACCESS')
        OF 11
            MESSAGE('ZINT_ERROR_MEMORY')
        .    
      .
          ?Image1{PROP:Text} = CLIP(DosFileName)
          DISPLAY :idied: 

[kreator]

Я думал, что Вы пользуетесь стандартными функциями MultiByteToWideChar, WideCharToMultiByte. Посмотрите как сделано в toutf8. Я в понедельник на работе попробую на стандарте. Мы в QR цифры кидаем, кириллицу не пробовали. Попробуем.

[vic7tar]

...Cstr (Ufil)...

А где можно скачать?

[Yufil]

Добрый день!

Наверное, здесь
https://mega.co.nz/#!RlAilJIT!2hvwWBkAn ... J3FmCLcmvw

А про использование - куча ссылок на форуме

[vic7tar]

Нерабочая ссылка.

[arlean1]

Нерабочая ссылка.

У меня открылось файловое хранилище и нормально скачался файл cstr .zip
На всякий случай посмотри настройки браузера.
У меня стоит Google Chrome Версия 70.0.3538.77