Class TSecHash (unit SecHash)

Inherits from

TComponent

Constructors



Functions

function ComputeFile(FileName:String):TIntDigest;


function ComputeMem(mem:pChar;length:integer):TIntDigest;

a = TEMP

function ComputeString(const Msg:String):TIntDigest;

Public-Deklarationen

End While ToCompute>0


function IntDigestToByteDigest(IntDigest:TIntDigest):TByteDigest;

End While ToCompute>0

procedure InitSHA;


procedure SHA;


Properties

Events

Variables

grVar : TIntDigest;


K : Array[0..79] of Integer;


klVar : TIntDigest;

Private-Deklarationen

M : Array[0..63] of Byte;


W : Array[0..79] of Integer;



Constructors


Functions


function ComputeFile(FileName:String):TIntDigest;


function ComputeMem(mem:pChar;length:integer):TIntDigest;

a = TEMP


function ComputeString(const Msg:String):TIntDigest;

Public-Deklarationen

End While ToCompute>0


function IntDigestToByteDigest(IntDigest:TIntDigest):TByteDigest;

End While ToCompute>0


procedure InitSHA;


procedure SHA;


Properties


Events


Variables


grVar : TIntDigest;


K : Array[0..79] of Integer;


klVar : TIntDigest;

Private-Deklarationen


M : Array[0..63] of Byte;


W : Array[0..79] of Integer;