Eso es precisamente lo que hace el procedimiento
Randomize
De la ayuda de delphi:
Cita:
Description
Randomize initializes the built-in random number generator with a random value (obtained from the system clock). The random number generator should be initialized by making a call to Randomize, or by assigning a value to RandSeed.
|