This is a realy critical problem:
Using a Version 4.1.1 and newest Version of Cryptography Pack i get different Hashes!
Code used:
fArgon2 := TArgon2KeyDerivation.Create(nil);
fArgon2.outputSizeBytes := 32;
fArgon2.counter := 10; // 10 Iterationen
fArgon2.memory := 16;
fArgon2.unicode := yesUni;
fArgon2.outputFormat := TConvertType.Base64;
var
key:string;
begin
fArgon2.StringSalt := TNetEncoding.Base64.Decode(aSalt);
key:=TNetEncoding.Base64.Encode(fArgon2.GenerateKey(aPWD));
result := (aHashedPWD = key);