Como gerar número ?
Gostaria de saber uma função, ou alguma forma, de gerar um número randomico em um determinado intervalo numerico :?:
abraços
abraços
Anonymous
Curtidas 0
Respostas
Anonymous
03/04/2003
Não entendi muito bem sua pergunta, mas para gerar um numero aleatório utilize a função Random();
Random(100); // gera um numero no intervalo de 0 a 100
Random(100); // gera um numero no intervalo de 0 a 100
GOSTEI 0
Hatrix
03/04/2003
Use o Random(nums) onde nums é o número máximo que ele sorteia;
mas a sequência irá ser sempre a mesma toda vez que vc iniciar o programa, para resolver isso vc coloca RANDOMIZE; no oncreate do formulário.
Ex;
Procedure Tform1.Form1Create(Sender:Tobject);
begin
Randomize;
end;
para usar o randon vc pode fazer o seguinte:
Por Exemplo:
Edit1.Text := IntToStr(Random(255));
mas a sequência irá ser sempre a mesma toda vez que vc iniciar o programa, para resolver isso vc coloca RANDOMIZE; no oncreate do formulário.
Ex;
Procedure Tform1.Form1Create(Sender:Tobject);
begin
Randomize;
end;
para usar o randon vc pode fazer o seguinte:
Por Exemplo:
Edit1.Text := IntToStr(Random(255));
GOSTEI 0