Ir para conteúdo
Faça parte da equipe! (2024) ×
Conheça nossa Beta Zone! Novas áreas a caminho! ×
  • Quem está por aqui   0 membros estão online

    • Nenhum usuário registrado visualizando esta página.

Criando Um Gerador De Cash!


Posts Recomendados

Oii pessoal! É O Seguinte, Eu vi que muitos de vocês não sabiam criar geradores de cash aí eu pensei "Se eles nao sabem, Eu sei, E Eu tenho tempo livre de sobra,

É Melhor eu criar uma video aula" Aí daí saiu isso,

Espero que vocês gostem ^.^

Ai Dentro Do Dowloand está a Video Aula

Ensinando Tudo, Quais Programas usar e tal.

 

Descrição:

- Essa Video Aula ensina a vocês como criar um Gerador De Cash pelo delphi, Prestem bem atenção, Qualquer dúvida é só falar ^.^

 

Códigos:

var

num,max,i:integer;

Key:Char;

begin

randomize;

max:=5;//quantidade de caracteres na senha

Edit1.Text:='';

for i:=0 to max do

begin

num := Round(random(36)); //Máximo do numero aleatório

case Num of

0: Key := '0';

1: Key := 'A';

2: Key := 'B';

3: Key := 'C';

4: Key := 'D';

5: Key := 'E';

6: Key := 'F';

7: Key := 'G';

8: Key := 'H';

9: Key := 'I';

10: Key := 'J';

11: Key := 'K';

12: Key := 'L';

13: Key := 'M';

14: Key := 'N';

15: Key := 'O';

16: Key := 'P';

17: Key := 'Q';

18: Key := 'R';

19: Key := 'S';

20: Key := 'T';

21: Key := 'U';

22: Key := 'V';

23: Key := 'W';

24: Key := 'X';

25: Key := 'Y';

26: Key := 'Z';

27: Key := '1';

28: Key := '2';

29: Key := '3';

30: Key := '4';

31: Key := '5';

32: Key := '6';

33: Key := '7';

34: Key := '8';

35: Key := '9';

end;

Edit1.Text:=Edit1.Text+Key;

end;

end;

 

Download:

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

 

Scan

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

 

 

Créditos:

~LvNinja

 

Te Ajudei Então me Agradeçe Não Demora nada, é so um Clike

 

07userbarjin.png&t=1

 

È Nois Que Tá Make

makezerofanhitsugaya.png

 

Upa Ele Pra mim

È Só Um Clike e Não Demora Nada

4701775.png

Link para o comentário
Compartilhar em outros sites

Belo Tutorial!

Mais Ele Ja É Existente Na Área Do Delphi Pelo Apple!

Da Uma Organizada Melhor No Tópico!

E Está Em Área Errada A Certa Seria A De Delphi/VB!

Pa rã rã rã rã rãaaaaa, pãrãaaaaaa, pãrãrãrã rã rã rã(8)

ASAPm3u.png

Link para o comentário
Compartilhar em outros sites

Este tópico está impedido de receber novos posts.
 Compartilhar

×
×
  • Criar Novo...

Informação Importante

Nós fazemos uso de cookies no seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies , caso contrário, vamos supor que você está bem para continuar.