Unit 'HlpSHA0'	Package
[Overview][Classes][Index]	[#pl_hashlib4pascal]

TSHA0

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: HlpSHA0.pas line 23

`type TSHA0 = class(TBlockHash,ICryptoNotBuildIn,ITransformBlock)`
`strict protected`
`FState: THashLibUInt32Array;`
`strict protected`
`const`
`C1 = UInt32($5A827999)`
`C2 = UInt32($6ED9EBA1)`
`C3 = UInt32($8F1BBCDC)`
`C4 = UInt32($CA62C1D6)`
`strict protected`
`procedure Finish; override;`
`procedure Expand(); virtual;`
`procedure TransformBlock(); override;`
`function GetResult; override;`
`public`
`constructor Create;`
`procedure Initialize; override;`
`function Clone; override;`
`end;`

Inheritance

`TSHA0`
\|
`TBlockHash,ICryptoNotBuildIn,ITransformBlock`
\|
`THash,IBlockHash`
\|
`TObject,IHash`

CodeTyphon Studio