|GetRand||Generates pseudorandom byte sequence|
|Burn||Deletes confidential data from TRandom instance|
|Free||Decrements reference count of TRandom instance|
- TRandom instance is freed from memory when the reference count reaches zero.
- there is no need to call
TRandom.Freeexplicitly; the instance is freed automatically when it goes out of scope
TRandom.Burnwhen the instance is freed from memory
var I, N: Integer; Rand: TRandom; begin try for I:= 0 to 11 do begin Rand.GetRand(N, SizeOf(N)); Writeln(IntToHex(N, 8)); end; finally Rand.Burn; end; end;