[Tutorial]Como Criar Um Gerador de Cash[Tutorial]

[italo5858 0]

Como Criar um Gerador de Cash

 

1 - Abra o Delphi 7 . Ponha Uma Image . 2 Buttons e 2 Edits e Arrume-os . Para Botar Uma Image Va No Additional e Selecione Image, e Agora Va em Picture Aperte nos ... e Va Em Load Selecione a Imagem e de Ok . Prontuh .

2 - Va em Button e Bote o Nome do 1 Button : Cartão e no 2 Button : Pin . Va nos 2 Edit e Deixem em Branco .Vá Em Form e Bote o Nome Do Seu Gerador de Cash .

3 - Vamos Adicionar o Codigo . Clique Duas Vezes No Button 1 e Adicione o Seguinte , Veja os Codigos, Obs : Sempre Que For Botar O Codigo Tire o Begin . :

 

Button 1

var

i: integer;

const

str = 'ABCDEFGHIJKLMNOPQRSTUVXYWZ1234567890';{Code a ser gerado}

max = 16;{O numero ou letra que vai gerar esse numero 6 é a quantidade de numero ou letra a ser gerador}

begin

Edit1.Text := '';

for i := 1 to max do

Edit1.Text := Edit1.Text + str[random(length(str))+1];

end;

 

end.

 

Button 2

 

var

i: integer;

const

str = 'ABCDEFGHIJKLMNOPQRSTUVXYWZ1234567890';{Code a ser gerado}

max = 10;{O numero ou letra que vai gerar esse numero 6 é a quantidade de numero ou letra a ser gerador}

begin

Edit2.Text := '';

for i := 1 to max do

Edit2.Text := Edit2.Text + str[random(length(str))+1];

end;

 

end.

 

 

Pronto Agora Va Em File > Save All.

 

Project > CompileProject1

 

Prontuh Divirta-se >:D

 

CrEdItOs So MeU~~ :D

[Mac! 0]

Opa. Belo tutorial, mas vale lembrar que esse programa apenas gera números aleatórios e funciona como um gerador de senhas.

[italo5858 0]

Sim , Mais Ele Era Funcional em Combat Arms .

[BlackLook 1]

na realidade isso não é um gerador de cash, e não adianta dizer que funcionou em combat arms pq isso é um gerador de nºs aleatórios, não um gerador de cash, fora isso, já tem milhares de tópicos ensinando a fazer isso, utilize a ferramenta pesquisar antes de postar.

[Skinn3r' 1]

@topic

Bom post man , segundo post seu

que eu vi que estava explicado com imagens ..

 

@atenção

Concordo com os 2 , ele gera numeros aleatorios apenas ...

 

[italo5858 0]

Skinn3r' , So Posto Coisas Com Imagens , Por Que Alguns Tem Dificuldades ;)