Problem mit Zint Barcode-Generator

[chaosben]

Naja ... ich gebe zu, das ist wenig tricky, aber vom Entwickler so geplant.

Zitat von http://www.zint.org.uk/zintSite/Manual.aspx?page=11:

An extra feature is available for Data Matrix symbols which allows Zint to automatically resize the symbol as required but also prevents Zint from using rectangular symbols. To set this mode at the command line use the option --square and when using the API set the value option_3 = DM_SQUARE

Lange Rede kurzer Sinn:

Delphi-Quellcode:

var myBmp :TBitMap;
    ZintBarcode1 :TZintBarcode;
begin
  ZintBarcode1 := TZintBarcode.Create;
  myBmp :=TBitmap.Create;

  ZintBarcode1.BarcodeType := tBARCODE_DATAMATRIX;
  ZintBarcode1.Option3 := 100;
  ZintBarcode1.Data := '123456789012345';
  ZintBarcode1.GetBarcode(myBmp);
  Image1.Picture.Bitmap := myBmp;

  ZintBarcode1.Free;
  myBmp.Free;
end;