diff --git a/components/lazbarcodes/images/images.txt b/components/lazbarcodes/images/images.txt index 4195628be..3d036c618 100644 --- a/components/lazbarcodes/images/images.txt +++ b/components/lazbarcodes/images/images.txt @@ -47,3 +47,6 @@ tbarcodedatamatrix_200.png tbarcodepdf417.png tbarcodepdf417_150.png tbarcodepdf417_200.png +tbarcodemaxicode.png +tbarcodemaxicode_150.png +tbarcodemaxicode_200.png diff --git a/components/lazbarcodes/images/tbarcodemaxicode.png b/components/lazbarcodes/images/tbarcodemaxicode.png new file mode 100644 index 000000000..41a26aea3 Binary files /dev/null and b/components/lazbarcodes/images/tbarcodemaxicode.png differ diff --git a/components/lazbarcodes/images/tbarcodemaxicode_150.png b/components/lazbarcodes/images/tbarcodemaxicode_150.png new file mode 100644 index 000000000..144023208 Binary files /dev/null and b/components/lazbarcodes/images/tbarcodemaxicode_150.png differ diff --git a/components/lazbarcodes/images/tbarcodemaxicode_200.png b/components/lazbarcodes/images/tbarcodemaxicode_200.png new file mode 100644 index 000000000..df82120b8 Binary files /dev/null and b/components/lazbarcodes/images/tbarcodemaxicode_200.png differ diff --git a/components/lazbarcodes/src/lazbarcodes_icons.res b/components/lazbarcodes/src/lazbarcodes_icons.res index c0f54808d..91b47749b 100644 Binary files a/components/lazbarcodes/src/lazbarcodes_icons.res and b/components/lazbarcodes/src/lazbarcodes_icons.res differ diff --git a/components/lazbarcodes/src/ubarcodes.pas b/components/lazbarcodes/src/ubarcodes.pas index 52f6061ea..503fc9a73 100644 --- a/components/lazbarcodes/src/ubarcodes.pas +++ b/components/lazbarcodes/src/ubarcodes.pas @@ -669,7 +669,8 @@ begin TBarcodeQR, TBarcodeMicroQR, TBarcodeAztec, TBarcodeAztecRune, TBarcodeDataMatrix, - TBarcodePDF417 + TBarcodePDF417, + TBarcodeMaxicode ]); RegisterPropertyEditor(TypeInfo(TCaption), TLazBarcodeCustomText, 'Text', TCaptionPropertyEditor); @@ -3376,8 +3377,8 @@ end; class function TBarcodeMaxiCode.GetControlClassDefaultSize: TSize; begin - Result.CX := 88; - Result.CY := 88; + Result.CX := 264; + Result.CY := 257; end; function TBarcodeMaxiCode.InternalGenerate: Integer;