search

foxitsoftware / DelphiZXingQRCode

Delphi port of QR Code functionality from ZXing, a barcode image processing library.
Apache License 2.0
197 stars 115 forks source link

Encoder error with AlphaCode #12

Open bronek999 opened 2 years ago

bronek999 commented 2 years ago

If input data is Alphanumeric code "A0" Encoder returns only "A"

if (Mode = qmAlphanumeric) then.... CanAdd := GetAlphanumericCode(Ord(Content[X])) > 0;

ALPHANUMERIC_TABLE['0'] returns 0.... So I modified it by : if (Mode = qmAlphanumeric) then.... CanAdd := GetAlphanumericCode(Ord(Content[X])) >= 0;