It would be nice to correct the demos

[nosakiis]

Hello,
I tested the available demos (VCL and FMX) with Delphi Sydney 10.4.2 and I have weird results: The resulting barcode images are compressed (1D barcode with very wide vertical lines and very low height). With such dimensions, most barcode readers cannot decode the barcode.

In the case of the FMX demo, the barcode is not only compressed but underneath the image is a pixels cloud.

It would be nice to correct the demos: An "image1.Bitmap.clear" to avoid "pixels cloud" and add lines to adapt barcode height and width to have a no compressed barcode