Como fazer um Gerador?

[jca159]

Eu quero fazer um Gerador no Delphi, Como se fosse um KeyGen, você clica no Botao e ele Gera um texto.

Mas como eu faço isso

OBS: já pesquisei na net, mas la só diz como fazer de 1 texto só

Eu quero que quando clicke no botao ele gere um texto aleratorio.

EX: Textos (carro, viagem, tempo) Dai eu clico no Botao e ele sorteia um deles.

Se nao entendeu fala ai.

Valéu

[souldeath]

Acho que só tem uma função que gere números aleatórios, para fazer isso aí você tem que escrever algum algoritmo. É como uma criptografia.

[Simon Viegas]

Eu quero fazer um Gerador no Delphi, Como se fosse um KeyGen, você clica no Botao e ele Gera um texto.

Mas como eu faço isso

OBS: já pesquisei na net, mas la só diz como fazer de 1 texto só

Eu quero que quando clicke no botao ele gere um texto aleratorio.

EX: Textos (carro, viagem, tempo) Dai eu clico no Botao e ele sorteia um deles.

Se nao entendeu fala ai.

Valéu

jca159, é simples, como souldeath comentou... existe um comando no Pascal (acredito que no Delphi também) que gera números aleatório. Daí basta você associar um número a cada palavra e "mandar" a correspondente para cada número sorteado.

***

Para gerar número

Random(x);

(ou Randon, ou Ramdom... algo assim rs)

Para evitar que repita o primeiro número a ser soteado...

Randomize;

Ex.

var
  sorte:interger;
  i:integer;
begin
randomize;
for i:=1 to 5 do
  begin
  sorte:=Random(10);
  writeln(sorte);
  end;
end.

Outro detalhes e para associar os valores eu deixo por tua conta

Qualquer coisa é só postar