Sortear Numeros
Como fazer um sorteio de número ?
O número não pode repetir... e tenque ser ALEATORIO... não pode ser programado !
Rodrigo!
O número não pode repetir... e tenque ser ALEATORIO... não pode ser programado !
Rodrigo!
Ropesca
Curtidas 0
Respostas
Slayer
15/07/2003
Use o Randomize, assim:
procedure TForm.BotaoClick(Sender: TObject);
begin
randomize;
Label.caption:=inttostr(random(x));
end;
Onde ´x´ é a quantidade de números que a execução vai gerar, pode ser 2 ou 100, 2000, depende de sua necessidade.
Espero ter ajudado.
procedure TForm.BotaoClick(Sender: TObject);
begin
randomize;
Label.caption:=inttostr(random(x));
end;
Onde ´x´ é a quantidade de números que a execução vai gerar, pode ser 2 ou 100, 2000, depende de sua necessidade.
Espero ter ajudado.
GOSTEI 0