TSHA256Base

type TSHA256Base = record

public

  Context: TContextBuffer;

  HashBuffer: THashBuffer;

  Index: UInt32;

  TotalLength: Int64;

  procedure Compress;

  procedure Final;

  procedure Init();

  procedure Update();

end;