OBR Library for FireMonkey

OBR Library for FireMonkey
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.4
  • source code included in registered version
  • royalty free distribution in applications


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

  TDecodePoint = record
    X, Y: Single;

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

  TBarcodeDecoder = class
    constructor Create;
    function Decode(Bitmap: TBitmap): 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: string 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;

Download and order


How can I solve "Class not registered." error message?
  • Create manifest file yourapplicationname.exe.manifest (change yourapplicationname accordingly to the name of your application):
  • <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
    <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
      <assemblyIdentity version="" processorArchitecture="*" name="yourapplicationname" type="*"/>>
          <assemblyIdentity type="win32" name="Microsoft.Windows.Common-Controls" version=""
            publicKeyToken="6595b64144ccf1df" language="*" processorArchitecture="*"/>
          <assemblyIdentity name="Winsoft.ZXing" version="" publicKeyToken="c2371442b2cedf55" processorArchitecture="msil"/>
  • Embed yourapplicationname.exe.manifest file to your application: Select Delphi menu Project/Options.../Application. Change Manifest File combobox to Custom and select yourapplicationname.exe.manifest file in Custom manifest edit box.
  • Instead of embedding yourapplicationname.exe.manifest file to your application, you can comment "{$R *.res}" line in yourapplicationname.dpr file and use external yourapplicationname.exe.manifest file:
  • // {$R *.res}

Related links