[ecfisa]

Hola de nuevo Paula.

El procedimiento Randomize, inicializa el generador pseudoaleatorio que trae incorporado Delphi a un valor tomado del reloj del sistema en ese instante y por lo tanto diferente cada vez que es llamado.

Se puede lograr algo similar asignandole el valor a la variable RandSeed, que es la semilla a partir de la cuál se generará la secuencia pseudoaleatoria.

Ejemplo:

Código Delphi [-]
  RandSeed:= Trunc(Now);

Saludos y gracias por tu colaboración.

Edito: El generador pseudoaleatorio no es más que un algorítmo que mediante cálculos obtiene una sucesión que trata de aproximarse lo más posible a una suceción aleatoria.