Numero Randimico

Delphi

14/08/2004

Urgente....

Alguem sabe como faço pra gerar um numero randomico.. entre 0 e 99..
e guardar numa variavel por exemplo.

Agradeço a ajuda....


Davefloripa

Davefloripa

Curtidas 0

Respostas

Fórum Vini

Fórum Vini

14/08/2004

Olá,
é só usar a função random() e randomize():
var
  Num: Integer;
begin
  Randomize;
  Num:= Random(100); //Se não me engano ele nunca sorteia o limite, por isso coloquei 99+1
end;


Espero ter ajudado,
Vinicius;


GOSTEI 0
Davefloripa

Davefloripa

14/08/2004

Sim isso eu sei...
eu fiz random(99)
só que o seguinte... ele gera sempre os mesmo valores...
o random rega sempre ... os mesmo.. dae
ele entra num loop infinito..
ouvi falar que tem um tal de Randseed
sei la algo assim
sabe como funciona..???

valeu
obrigado pea ajuda


GOSTEI 0
Cebikyn

Cebikyn

14/08/2004

Coloca [b:908c468a55]Randomize;[/b:908c468a55] na inicialização do programa, assim será gerada uma nova [i:908c468a55]RandSeed[/i:908c468a55], que é usada para a geração de nvs números. Se vc não chamar o Randomize, o RandSeed não varia, logo, os números serão sempre os mesmos. Outra opção é mudar o RandSeed manualmente.


GOSTEI 0
POSTAR