Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 03-03-2010
bothy bothy is offline
Miembro
 
Registrado: ene 2010
Posts: 144
Poder: 15
bothy Va por buen camino
randomize

Quisiera saver como le ago para llenar un listbox con 20 numero aleatorios del 1 al 100. dandole click a un boton..
Responder Con Cita
  #2  
Antiguo 03-03-2010
Avatar de dec
dec dec is offline
Moderador
 
Registrado: dic 2004
Ubicación: Alcobendas, Madrid, España
Posts: 13.107
Poder: 34
dec Tiene un aura espectaculardec Tiene un aura espectacular
Hola,

¿Y en qué punto encontraste problemas?
Responder Con Cita
  #3  
Antiguo 03-03-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
Hola bothy, debes utilizar la función RandomRange de la unit math, el ejemplo que te pongo no controla repetidos.
Código Delphi [-]
 Randomize;
 for i:=0 to 19 do
  begin
   num := RandomRange(1,100);
   ListBox.Items.Add(IntToSTr(num));
  end;

Otra cosita, he visto tus ultimos hilos y los has puesto en el foro de "Kylix, Lazarus, FreePascal...." y veo que utizas delphi 2009, por favor la siguiente ves que crees un nuevo hilo hazlo en el foro que corresponda. Ahora muevo tu hilo al foro de varios.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #4  
Antiguo 03-03-2010
BrunoBsso BrunoBsso is offline
Miembro
 
Registrado: nov 2009
Ubicación: Berisso, Buenos Aires, Argentina
Posts: 239
Poder: 15
BrunoBsso Va por buen camino
O también creo que podría ser asi:
Código Delphi [-]
Randomize;
for I:=0 to 19 do begin
  Numero:=Random(100)+1;
  ListBox.Items.Add(IntToStr(Numero));
end;
Así no tendrías que usar la unit Math.
Saludos!

Última edición por BrunoBsso fecha: 03-03-2010 a las 15:33:54. Razón: Escribí mal el bucle
Responder Con Cita
  #5  
Antiguo 03-03-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
Cita:
Empezado por BrunoBsso Ver Mensaje
O también creo que podría ser asi:
.........................


Así no tendrías que usar la unit Math.
Si , también podría ser así, solo que el Random tendría que ser de 99.

Código Delphi [-]
  Numero:=Random(99)+1;

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #6  
Antiguo 03-03-2010
BrunoBsso BrunoBsso is offline
Miembro
 
Registrado: nov 2009
Ubicación: Berisso, Buenos Aires, Argentina
Posts: 239
Poder: 15
BrunoBsso Va por buen camino
Exclamation

Cita:
Empezado por Caro Ver Mensaje
Si , también podría ser así, solo que el Random tendría que ser de 99.
Pero si el random fuese de 99, sería del 0 al 98, y sumándole siempre 1 sería del 1 al 99.
Él quiere que sea del 1 al 100, o sea para el compilador del 0 al 99. Por eso le pasás el argumento 100 a random, para decirle que puede elegir entre 100 números (0 ~ 99) y le sumás 1 para que nunca sea 0.
Responder Con Cita
  #7  
Antiguo 03-03-2010
Avatar de Caro
*Caro* Caro is offline
Moderadora
 
Registrado: jul 2004
Ubicación: Cochabamba, Bolivia
Posts: 2.544
Poder: 22
Caro Va por buen camino
Cita:
Empezado por BrunoBsso Ver Mensaje
Pero si el random fuese de 99, sería del 0 al 98, y sumándole siempre 1 sería del 1 al 99.
Él quiere que sea del 1 al 100, o sea para el compilador del 0 al 99. Por eso le pasás el argumento 100 a random, para decirle que puede elegir entre 100 números (0 ~ 99) y le sumás 1 para que nunca sea 0.
Si tienes razón, se me había olvidado que el random va desde mayor o igual a 0 y menor al numero que le pasas como parámetro.

Saluditos
__________________
Disfruten cada minuto de su vida a lado de sus seres queridos como si fuese el ultimo, uno nunca sabe lo que puede pasar.
Responder Con Cita
  #8  
Antiguo 03-03-2010
bothy bothy is offline
Miembro
 
Registrado: ene 2010
Posts: 144
Poder: 15
bothy Va por buen camino
Gracias colegas... eso es lo que queria saber .

si este foro se llama clubdelphi y yo uso delphi 2009 yo pense que poniendo mis hilos en este foro de lazarus,freepascal era lo correcto .. entoces estos hilos los debo escribir en el foro de " otros"..
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
como usar RANDOMIZE yessika19 Varios 6 24-10-2018 12:20:13
Diferencia entre random y randomize Tapax C++ Builder 9 08-12-2006 22:40:26


La franja horaria es GMT +2. Ahora son las 13:47:22.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi