Generador de números aleatorios

[elcigarra]

Perdón... donde dije "esto no se obtiene con la función RandG..."
quise decir "esto SE obtiene con la función RandG..

[gontxalo]

Hola
gracias
Ya me funciona, hasta ahora al ejecutar siempre se repetían las series, pero no sabía cambiar la semilla.
Ya se ejecuta y no se repiten, ni empiezan con la misma serie.

Gracias

[gontxalo]

Hola
Tengo ya un form que genera números aleatorios. Randomize. Según Maeyanes:

De la ayuda de delphi:
Citar:

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.

Randomiza la semilla del reloj.

Alguien sabe si la semilla que randomiza es respecto a segundos, centésimas, milésimas....

[[maeyanes]]

Según el código fuente del procedimiento Randomize, este primero trata de obtener el valor del contador de funcionamiento de alta resolución (high-resolution performance counter) con la función QueryPerformanceCounter del API y si falla, usa la función GetTickCount (también del API) la cual obtiene el número de milisegundos que han pasado desde que el sistema se encendió.

Ya con eso te darás una idea de como inicializa la semilla este procedimiento.


Saludos...