Класс для API ZINT «Barcode Generator»

[Игорь Столяров]

Библиотека для создания практически любых штрих-кодов.
В примере показан вывод штрих-кодов в окно и отчёт.

(Перекрестная ссылка на альтернативу viewtopic.php?p=40124#p40124) добавил Admin

[Constantine]

Понимаете, в одной деревне всех звали Буратино

Ну, там еще Папа Карло есть...

В ZINT есть ещё возможность генерить векторные форматы (SVG)

[APS]

Добрый день.
Использую, вернее пытаюсь ZINT BarCode с C6.3 ШВС.
При вызове

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

Loc:MyZint.PrintToReport(Report,?Image1,Loc:TextBarCode)

вываливаются сообщения:

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

Unresolved External LONGTOHEX@FUlUc in zint.obj
Unresolved External LONGTOHEX@FUlUc in zint.obj
Unresolved External LONGTOHEX@FUlUc in zint.obj
Unresolved External LONGTOHEX@FUlUc in zint.obj
Unresolved External RESIZEIMAGE@FsssssBr in zint.obj
Unresolved External RESIZEIMAGE@FsssssBr in zint.obj

Библиотека к проекту подключена.
Не подскажите, как исправить?

[Игорь Столяров]

Не подскажите, как исправить?

Не может такого быть или Вы что-то улучшали в классе самостоятельно.
Проверьте Ваш ZINT.CLW

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

  MEMBER
  Include('zint.inc')
  
  MAP
    Include('cwutil.inc'),Once   ! <--- ????

    MODULE('zintapi')
      ZBarcode_Create(),Long,Raw,C,Name('ZBarcode_Create')
      ZBarcode_Clear( Long symbol),Raw,C,Name('ZBarcode_Clear')
      .....

Строка с Include('cwutil.inc'),Once - как раз и подключает методы, которые у Вас не найдены ...
И не надо ничего подключать к проекту, это делается строкой PRAGMA('link (zint.lib)')

[APS]

Спасибо за наводку. Заработало. Только чет у меня лыжи неправильно едут. Все-таки пришлось CWUTIL.CLW подключить к проекту.

[Игорь Столяров]

Пожалуйста. Мне сложно как-либо комментировать работу проекта, который я не видел.
С классом идёт пример, который демонстрирует его работу. И у Вас же ещё антикварные шаблоны.
Я ШВС видел один раз в жизни, лет 15 назад. И это был последний раз, когда я их видел.

[finsoftrz]

Не так давно один из бывших сотрудников SV с мягким испанским акцентом проговорился, что вместо хорошего и понятного языка clarion мы имеем кучу плохо документированного и непонятно как работающего кода в abc классах. Просто небольшой повод постебаться на тему "не трожь мои игрушки и не писай в мой горшок".

[Игорь Столяров]

непонятно как работающего кода в abc классах

Ну так не от хорошей же жизни ...
Если бы SV вместо разной [цензура] вроде AnyScreen и ClaExt по $800 добавил в ABC функционал,
который действительно нужен, кто-бы вот то пилил по норкам ZInt, Zlib, XlsxWriter, ClaCurl и т.д.
Просто когда уже попа полная, да, идёшь на sourceforge и ищешь чего бы прикрутить на шару.

[Игорь Столяров]

В первом сообщении добавил обновление класса ZINT BarCode для библиотеки ZINT версии 2.9.1

[Игорь Столяров]

В первом сообщении добавил обновление класса ZINT BarCode для библиотеки ZINT версии 2.10.0
Список изменений: https://sourceforge.net/projects/zint/f ... nt/2.10.0/

[Игорь Столяров]

В первом сообщении добавил обновление класса ZINT BarCode для библиотеки ZINT версии 2.11.0
Список изменений: https://sourceforge.net/projects/zint/f ... nt/2.11.0/

[Игорь Столяров]

В первом сообщении добавил обновление класса ZINT BarCode для библиотеки ZINT версии 2.11.1
Список изменений: https://sourceforge.net/projects/zint/f ... nt/2.11.1/

[pansoft]

Добрый день, Игорь!

В zint есть свойство Loc:MyZint.Setting.sBorderWidth - ширина отступа. Устанавливал этот параметр 30 и 100 ни каких изменений нет. Подскажите какие в него передавать значения и работает он?

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

[Игорь Столяров]

какие в него передавать значения и работает он

Класс устанавливает параметр штрих-кода "border_width" для методов ZINT из DLL.
Для разных штрих-кодов - разные параметры настройки. Посмотрите поиском в
прикреплённом файле по строке "border_width" - он используется только для кода ITF-14.

[Игорь Столяров]

В первом сообщении добавил обновление класса ZINT BarCode для библиотеки ZINT версии 2.12.0
Список изменений: https://sourceforge.net/projects/zint/f ... nt/2.12.0/

[Игорь Столяров]

Небольшая доработка класса для печати моднячих узких штрих-кодов EAN-13 на ценниках.
Установить нужный размер и выключить печать цифр в штрих-коде: MyZint.Setting.sHideText = True
Остальное она сделает сама ...