fix: ZXing.Common.BitMatrix Range Check Error - #104

Spelt · Aug 29, 2020 · a2ad2bb · a2ad2bb
1 parent 70ed58e
commit a2ad2bb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Lib/Classes/Common/ZXing.Common.BitMatrix.pas b/Lib/Classes/Common/ZXing.Common.BitMatrix.pas
@@ -92,7 +92,7 @@ implementation
 
 function TBitMatrix.getBit(x, y: Integer): Boolean;
 var
-  offset, v, bits, shift: Integer;
+  offset, v, bits, shift: Int64;
   uBits: Cardinal;
 begin
   offset := y * FrowSize + TMathUtils.Asr(x, 5);