Fórum rotina em Delphi que faça sorteio de números #174815
13/08/2003
0
Alguém poderia me ajudar ?
Obrigada,
Marcela_m
Curtir tópico
+ 0Posts
13/08/2003
Marcelo Saviski
tipo, NumeroAleatorio := Random(18001);
detalhe, 18001, a função Random sorteia um numero entre 0 e o numero maximo especificado, mas não retorna o valor maximo nunca.
outro detalhe, toda vez que você rodar a aplicação, e pedir esse random, ele vai ser sempre igual, irá sortear todoas as vezes os mesmos numeros aleatórios, para resolver isso, no onCrete de algum form coloque
Randomize;
a função Randomize ´muda´ o valor da variavel RandSeed, que conrola o Random
se não for isso, por favor, explique melhor, não entedi o porque do ´Cadastrados no Banco´
Gostei + 0
13/08/2003
Marcela_m
Mas valeu,
Até mais,
Gostei + 0
13/08/2003
Marcelo Saviski
table.First;
table.MoveBy(Random(table.recordcount));
numerodametricula := table.fieldbyname(´matricula´).asinteger;
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)