TSHA256

type TSHA256 = record

public

  Context: array [0..7] of UInt32;

  Digest: TSHA256Digest;

  HashBuffer: array [0..63] of Byte;

  Index: UInt32;

  TotalLength: Int64;

  procedure Compress;

  procedure Final;

  procedure Init;

  function IsEqual();

  procedure OutputHexa();

  procedure Update();

  class procedure DigestBytes();

  class procedure DigestBase64();

  class procedure DigestHexa();

  class function HMAC();

  class function HMACHexa(); overload;

  class procedure Stream();

  class procedure StreamHexa();

  class procedure StreamBase64();

  class function HKDF();

end;