Tema: numeros aleatorios
Ver Mensaje Individual
  #2  
Antiguo 24-11-2003
Avatar de __hector
[__hector] __hector is offline
Miembro Premium
  
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 1.075
Reputación: 23
__hector Va por buen camino
random. Tienes que inicializar la semilla con randomize.

Breve ejemplo:

Código:
   randomize;
   edit1.Text := inttostr(random(50) + 1 );
__________________
Héctor Geraldino
Software Engineer
Responder Con Cita