Update BCrypt.Core.pas

Correção para o erro: #5
viniciussanchez · Nov 18, 2022 · 5c4f16b · 5c4f16b
1 parent c2986ec
commit 5c4f16b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/BCrypt.Core.pas b/src/BCrypt.Core.pas
@@ -291,7 +291,7 @@ function TBCryptImpl.MakeSalt: TBytes;
   Randomize;
   LRandomTemp := MTRandomBytes(BCRYPT_SALT_LEN);
   I := 0;
-  while I <= Length(LRandomTemp) do
+  while I < Length(LRandomTemp) do
   begin
     LByteArray[i] := Ord(LRandomTemp[i + 1]);
     Inc(i);