Delphi and C++ Builder optical barcode recognition library.

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
available for Delphi/C++ Builder 7 - 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;

  TDecodePoint = record
    X, Y: Single;
  end;

  TDecodeResult = record
    Text: WideString;
    Format: TBarcodeFormat;
    FormatName: string;
    Points: array of TDecodePoint;
  end;
  TDecodeResults = array of TDecodeResult;

  TBarcodeDecoder = class
  public
    constructor Create;
    function Decode(Graphic: TGraphic): TDecodeResults;

    property AssumeCode39CheckDigit: Boolean read write;
    property AssumeGS1: Boolean read write;
    property AssumeMSICheckDigit: Boolean read write;
    property AutoRotate: Boolean read write;
    property BarcodeFormats: TBarcodeFormats read write; 
    property CharacterSet: WideString read write;
    property DecodeMultiple: Boolean read write;
    property PureBarcode: Boolean read write;
    property ReturnCodabarStartEnd: Boolean read write;
    property TryHarder: Boolean read write;
    property TryInverted: Boolean read write;
    property UseCode39ExtendedMode: Boolean read write;
    property UseCode39RelaxedExtendedMode: Boolean read write;
  end;

Only for V.I.P