Delphi and C++ Builder optical barcode recognition library for FireMonkey.

uses ZXing.Net library
supports UPC-A, UPC-E, EAN-8, EAN-13, Code 39, Code 93, Code 128, Codabar, ITF, RSS-14, RSS-Expanded, QR Code, Data Matrix, Aztec, PDF 417 and Pharmacode barcodes
supports Windows 32 and Windows 64 FireMonkey applications
available for Delphi/C++ Builder XE2 - 10.3
source code included in registered version
royalty free distribution in applications

API

type
  TBarcodeFormat = (bfUnknown, bfAztec, bfCodabar, bfCode39, bfCode93,
    bfCode128, bfDataMatrix, bfEan8, bfEan13, bfItf, bfMaxicode, bfPdf417,
    bfQrCode, bfRss14, bfRssExpanded, bfUpcA, bfUpcE, bfUpcEanExtension,
    bfMsi, bfPlessey, bfImb, bf1D);
  TBarcodeFormats = set of TBarcodeFormat;

  TDecodeResult = record
    Result: _Result;
    Text: string;
    Format: TBarcodeFormat;
    FormatName: string;
    Points: array of TPointF;
  end;
  TDecodeResults = array of TDecodeResult;

  TBarcodeDecoder = class
  public
    constructor Create;

    function Decode(Bitmap: TBitmap): TDecodeResults;

    property AssumeCode39CheckDigit: Boolean read write;
    property AssumeGS1: Boolean read write;
    property AssumeMSICheckDigit: Boolean read write;
    property BarcodeFormats: TBarcodeFormats read write; 
    property CharacterSet: string read write;
    property PureBarcode: Boolean read write;
    property ReturnCodabarStartEnd: Boolean read write;
    property TryHarder: Boolean read write;
    property UseCode39ExtendedMode: Boolean read write;
    property UseCode39RelaxedExtendedMode: Boolean read write;
  end;

Only for V.I.P