Você não está conectado. Conecte-se ou registre-se

Ver o tópico anterior Ver o tópico seguinte Ir em baixo  Mensagem [Página 1 de 1]

mistiyoda

Membro
Membro

avatar
Em algumas situações precisamos gerar números randômicos. Em Delphi isso pode ser feito com o auxílio da função Random(). Esta função aceita um valor inteiro e retorna um número aleatório maior ou igual a 0 e menor que o valor fornecido. Assim, se quisermos obter um número randômico na faixa de 0 a 10, só precisamos fornecer o valor 11 para a função Random(). Note ainda a chamada à função Randomize(), usada para iniciar o gerador de números randômicos.

Veja um exemplo no qual geramos um número aleatório na faixa de 0 a 10:

procedure TForm1.Button1Click(Sender: TObject);
var
numero: integer;
begin
// vamos iniciar o gerador de números randômicos
Randomize;

// vamos gerar um número aleatório entre 0 e 10
numero := Random(11);

// exibe o resultado
ShowMessage('Número gerado: ' + IntToStr(numero));
end;


Para questões de compatibilidade, esta dica foi escrita usando Delphi 2009.
Palavras-chaves:
gerador, quisermos, randômicos , faixa, randômico, ou, escrita, 0, Gerando, no, qual, função, só, > Para, e, compatibilidade, se, ainda, um, para, IntToStr, Veja, exibe, exemplo, pode, Sender, fornecido, dica, resultado , auxílio, gerado, procedure, iniciar, igual, que, retorna, =, inteiro, da, integer; begin , esta, ; , número, Randomize; , TObject, questões, de, Button1Click, aleatório, randômicos, Delphi, com, chamada, precisamos, Número, isso, numero, ShowMessage, 10 , ; var , feito, obter, 11, fornecer, o, > Em, 2009, gerar, a, > , situações, 10, aceita, Note, Esta, usando, menor, entre, algumas

http://www.portalmaker.co.cc

Gustavo

Administrador
Administrador

avatar
]font=Arial Black]
Tem gente que diz que isso é gerador de cash, só que colocam 2 edits, e um com 16 números aleatórios e outro com 10.
E ainda diz que é funcional! xD Vlw!
[/font]


_______________________________________________


http://directon.forumeiros.com

mistiyoda

Membro
Membro

avatar
mais o gerador é sorte mesmo ele vai gerando números tem 0,1% de chanse de gera cash meu amigo ja conseguiu 700.

http://www.portalmaker.co.cc

gun`s rose

Membro
Membro

avatar
Fechado [x]
Conteudo Proibido:Leias as [Você precisa estar registrado e conectado para ver este link.] antes de posta

Conteúdo patrocinado


Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo  Mensagem [Página 1 de 1]

Permissão deste fórum:
Você não pode responder aos tópicos neste fórum