anchor.diff:  	Result := derivedKey;
   end;
   
  +{$IFDEF MSWINDOWS}
  +
   { TBCryptDeriveKeyPBKDF2 }
   
   constructor TBCryptDeriveKeyPBKDF2.Create(const AlgorithmID: UnicodeString; const Provider: PWideChar);
  
positive.code: 
  	for i := 1 to l do
  	begin
  		ZeroMemory(@Ti[0], hLen);
  		for j := 1 to IterationCount do
  		begin
  			if j = 1 then
  
negative.code: 		raise Exception.Create('BCrypt not available. Requires Windows Vista or greater');
  end;
  
  {$ENDIF}
  
  { THmac }
  
  constructor THmac.Create(Hash: IHashAlgorithm);
  