[ajuda] Criar um Sorteador de nomes

[-CharlesHenriquePedia 0]

Queria criar um programa que sorteie nome, e queria mais ou menos as funções pra issu, se alguem puder ajudar fico grato.

[~OwneR~ 8]

Adicione um ListBox, um Edit e um Button

Adicione os nomes no ListBox (vá em items no object inspector).

Coloque a propriedade Visible do ListBox como false.

No onClick do Button deixe assim:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

Lembre-se que isso só irá gerar os nomes adicionados no ListBox ok?

Você pode aperfeiçoar isso separando os nomes por ordem alfabética, número de letras etc...

[-CharlesHenriquePedia 0]

legal *O* mas e se eu quisesse fazer com q aparecesse uma letra de cada vez ?

[~TnT Claw 0]

Fazer um gerador de nomes seria impossivel , pq tipo Ele nao tem gravado nomes entende, si vc quiser faze um gerador eh apenas dakele jeito que o kra falo ali,

ja um gerador de letra ja eh possivel, gerar tipo 20 letras ex: AOAZXCMAWI

 

vou fazer de cabeça aki!

existe formas faceis mais vo faze aki

ou você faz assim:

 

COLOQUE NA LISTBOX TODAS AS LETRA DE A ATÉ Z

EX:

A

B

C

D

 

Dai tipo a quantidade de letras que vc querer para aparecer no edit basta voce adicionar depois de onde esta VERDE

Edit1.Text:=ListBox1.Items[Random(Listbox1.items.count)] + ListBox1.Items[Random(Listbox1.items.count)] + ListBox1.Items[Random(Listbox1.items.count)]

NESSE CASO IRA APARECE 3 LETRAS SORTIDAS NO EDIT1, DAI CASO QUEIRA MAIS EH SO IR REPITINDO O PROCESSO =)

ESPERO QUE TENHA ENTENDIDO PQ EXPLIQUEI BEM MAL KKK

 

 

 

 

 

 

 

[-CharlesHenriquePedia 0]

entendi sim aishaishaish' mas se eu jogasse um IF

 

pra edit1.text receber só se as letras(em sequencia) for igual a algum item da listbox2 (q criaria e inseria novo) daria certo ?

 

--

 

 

no caso tipo, minha duvida era sortear um nome na listbox, e aparecer esse nome uma letra de cada vez tendeu ? asihaishai':D

[~OwneR~ 8]

Interessante isso rç

Tá na mão o código, ele vai adicionar uma letra a cada meio segundo

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se