API
type
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;
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;