logo
small logo
  • Продукты
  • Купить
  • Поддержка
  • О нас
  • Клиентская панель Поддержка
  • Главная
  • /
  • Статьи
  • /
  • Работа и тонкая настройка штрих-кода ITF-14 в Delphi / Lazarus
  • Как создать штрих-коды CODE 39 и CODE 39 Extended в VCL

    23 октября 2020 г.

    CODE 39 - это штрих-код, разработанный Intermec Corporation в 1975 году, который может содержать в

    Подробнее
  • Создаём штрих-код ITF в Delphi / Lazarus / С++ Builder

    11 ноября 2020 г.

    Немного теории о штрих-кодах Сложно представить нашу жизнь без штрих-кодов особенно сейчас, когда мы их встречаем

    Подробнее
  • Как сделать квитанцию с QR-кодом по спецификации СБЕРа на Delphi и Lazarus

    14 декабря 2020 г.

    Штриховой код, как технология автоматической идентификации и сбора данных, широко используется при осуществлении платежей физическими

    Подробнее
  • Как добавить Swiss QR-код в счёт на Delphi и Lazarus

    2 июня 2020 г.

    Сейчас многие страны проводят «диджитализацию» платежных систем, то есть оцифровывание. Самый распространенный способ автоматизации платежей

    Подробнее
  • Как в Delphi / Lazarus / С++ Builder работать с картами в формате SHP

    28 сентября 2020 г.

    ShapeFile, они же «Шейпы» (англ. Shape — Фигура) представляют собой фигуру или набор фигур (возможно

    Подробнее

Работа и тонкая настройка штрих-кода ITF-14 в Delphi / Lazarus

7 сентября 2021 г.

ITF-14

С версией FastReport VCL 2021.2 был добавлен новый штрих-код ITF-14. Напомню, что ITF-14 (Interleaved Two of Five) - это двухполосный числовой код, по-другому код высокой плотности, который может кодировать только числа в чётном количестве. Каждый такой штрих-код кодирует нечётную цифру темной линией и чётную цифру - пробелом между ними. Чтобы закодировать нечётное число цифр, вы должны дополнить самую левую (старшую) цифру нулем. Больше теории о ITF-14 можно почитать в другой нашей статье.

Не так давно нашими пользователями были найдены не критичные ошибки, тем не менее, иногда мешавшие использованию в работе штрих-кода. Исправления уже имеются в общем доступе. Данная статья должна помочь пользователям, которые ещё не заметили ошибок, а также познакомит с особенностями реализации в нашем продукте.

Было замечено, что при некоторых условиях под штрих-кодом могли выводиться неверные цифры. А также штрихи выходили за границы рамки снизу.

Исправленный штрих-код

Эти ошибки уже исправлены и если вы используете в своих проектах ITF-14, то мы настоятельно советуем вам обновить FastReport до последней версии.

А теперь перейдем к особенностям.

У данного штрих-кода рамка является обязательной, так как она прописана в спецификации, поэтому возможности полностью её отключить или сильно изменить не будет. Но изменить её всё же можно.

Во-первых, можно отключить боковые линии, включив свойство TestLine.

ITF-14 без боковых линий

Во-вторых можно изменить толщину встроенной рамки, изменив Frame->Width. Это свойство будет работать даже если внешняя рамка отключена.

Изменение толщины встроенной рамки

Дополнительно можно включить и настроить общую внешнюю рамку, используя свойство Frame. Принцип точно такой же, как и у любого другого объекта в отчёте, а после у штрихкода будет сразу 2 рамки, причём, внешняя более богата в возможностях оформления.

Пример двух рамок на одном штрих-коде

Создание штрих-кода ITF-14 из кода в Delphi / Lazarus

procedure TForm1.Button1Click(Sender: TObject);
 var bc: TfrxBarcodeView;
begin
 bc := TfrxBarcodeView(frxReport1.FindObject('BarCode1'));
 {Устанавливаем тип штрихкода}
 bc.BarType := bcCode_ITF_14;
 {Устанавливаем фиксированное значение штрихкода}
 bc.Text := '12345678912345';
 {Устанавливаем масштаб, в котором будет отображаться штрихкод}
 bc.Zoom := 2;
 {Устанавливаем угол поворота штрихкода. Может принимать значения 0, 90, 180, 270}
 bc.Rotation := 0;
 {Устанавливаем, нужно ли устанавливать ширину штрихкода в зависимости от его содержимого.}
 {При значении False Zoom будет принимать такое значение, чтобы ширина штрихкода оставалась фиксированной}
 bc.AutoSize := True;
 {Устанавливаем цвет фона штрихкода}
 bc.Color := clNone;
 {Устанавливаем цвет линий штрихкода}
 bc.ColorBar := clBlack;
 {Устанавливаем, нужно ли отображать текст внизу штрихкода}
 bc.ShowText := True;
 {Устанавливаем ширину внутренней рамки}
 bc.Frame.Width := 3;
 {Настройка внешней рамки}
 {Устанавливаем отображение внешних рамом со всех сторон}
 bc.Frame.Typ := [ftLeft, ftRight, ftTop, ftBottom];
 {Устанавливаем ширину левой рамки}
 bc.Frame.LeftLine.Width := 5;
 {Устанавливаем цвет левой рамки}
 bc.Frame.LeftLine.Color := clRed;
 {Устанавливаем стиль левой рамки}
 bc.Frame.LeftLine.Style := fsDashDotDot;
 {Копируем настройки левой рамки в правую рамку}
 bc.Frame.RightLine.Assign(bc.Frame.LeftLine);
 {Копируем настройки левой рамки в верхнюю рамку}
 bc.Frame.TopLine.Assign(bc.Frame.LeftLine);
 {Копируем настройки левой рамки в нижнюю рамку}
 bc.Frame.BottomLine.Assign(bc.Frame.LeftLine);
 frxReport1.ShowReport();
end;

ITF-14 несомненно является одним из самых часто используемых штрих-кодов. При возникновении ошибок или вопросов вы можете написать нам в Поддержку. 

О продукте Купить
avatar
Sergey Plastun
VCL разработка
Fast Reports Team: Sergey Plastun - VCL Development at Fast Reports
VCL Lazarus FastReport Barcode Delphi

Добавить комментарий
logo
  • +7(800)551-75-80
  • info@fastreport.ru
  • Ростов-на-Дону, Россия, 344082, ул.Обороны 24, офис 311
  • Купить
  • Загрузить
  • Документация
  • Отзывы
  • Как деинсталировать
  • FAQ
  • Видео уроки
  • Форум
  • Условия оказания поддержки
  • Статьи
  • Наши Новости
  • Пресса о нас
  • Реселлеры
  • Нестандартное лицензирование
  • ВУЗам
  • Карьера
  • Контакты

© 1998-2023 ООО «Быстрые отчеты»

  • Согласие с обработкой персональных данных
  • Политика в отношении обработки персональных данных
  • Не является публичной офертой

By clicking “Accept all, you agree Fast Reports can store cookies on your device and disclose information in accordance with our Cookie Policy.