Quote Originally Posted by Robert Kosek
Huh, strange. It might be faster to save the random seed, change it to the UTC time (as a longword) and then modify that number by a random integer.
thx i used google and found some info,
im using this way
[pascal]DecodeTime(Time,seed,seed,seed,seed);
RandSeed := seed;[/pascal]

tnx for all