Pārlūkot izejas kodu

* Fix max key size

Michaël Van Canneyt 2 gadi atpakaļ
vecāks
revīzija
2d1e14f778
1 mainītis faili ar 1 papildinājumiem un 1 dzēšanām
  1. 1 1
      packages/fcl-base/src/blowfish2.pp

+ 1 - 1
packages/fcl-base/src/blowfish2.pp

@@ -107,7 +107,7 @@ ResourceString
 
 Const
   N = 64;
-  MaxKeyLen = 128;
+  MaxKeyLen = 528;
   ORIG_P : TBlowFishPArray = (
         
 QWord($243F6A8885A308D3),QWord($13198A2E03707344),QWord($A4093822299F31D0),