Criando Geragor de Cash Simples Pelo Delphi 7

[HoruS* 22]

Bom pessoal , nesse tutorial irei lhes ensinar como criar um Gerador de Cash simples , pelo delphi 7 , por favor prestem atençao para nao se perder em nenhum passo , se nao o gerador nao ira funcionar :D Porem e muito raro cair numeros validos , mas o Combat Arms ainda nao tem sistema de cash , mas decidi criar agora msm :D

 

So que por as imgs serem grandes demora um pouco para carrega-las , caso demore muito clique no link que colokei a baixo delas , entao qnd abrir a pagina clique para atualizar e a img ira carregar inteira :D

 

Caso voce ainda nao tenha o delphi de uma olhada na kick list do DragonBoss KICK LIST DRAGONBOSS

 

Tutoria:

 

1° abra o delphi

 

 

 

2º Mude o "Caption" para o nome do seu gerador mudar, e ageite um espaço legal para o seu gerador.

 

 

3º Adicione 2 "Buttons" e 2 "Edits" localizados na aba "Standard" na sua form.

 

4º Mude os "Captions" dos "Buttons" e das "Edits" igual o da imagem.

 

 

5º Adicione uma "Label" localizado na aba "Standard" e clique nos "..." para fazer um logo mais bonito.

 

 

6º De dois cliques no "Cartão", apague o begin e o end; e adicione este código:

Código:

 

 

var

i:integer;

const

str='1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ';

max=16;

begin

Edit1.Text:='';

for i:=1 to max do

begin

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

end;

end;

 

7º De dois cliques no "PIN", apague o begin e o end; e adicione este código:

Código:

 

var

i:integer;

const

str='1234567890ABCDEFGHIJKLMNOPQRSTUVWXYZ';

max=10;

begin

Edit2.Text:='';

for i:=1 to max do

begin

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

end;

end;

 

8º Va na aba "Win32" e adicione uma "StatusBar"

 

 

9º Clique na "StatusBar", em seguida va ao menu a esquerda e procure por "Panels", e clique no "..."

 

 

10º Clique em "New", um menu aparecera na esquerda, va em "Text" e escreva o que vai aparecer embaixo da aplicação. Vai ficar assim:

 

 

11º Va na aba "Win32" e adicione um "XpManifest", para sua aplicação ficar com um melhor design.

 

 

12º Para finalizar, va em "Project" em seguida "Options"

 

 

13º Va na aba "Application", la você pode editar o Título das mensagens a serem exibidas no gerador e o ícone do gerador.

 

 

Pronto! Agora va em File, "Save Project As...", escolha um local e salve. Depois abre ele e antao o projeto sera aberto pelo delphi , aperte CTRL+F9, e o seu gerador aparecera no mesmo local em que o projeto foi salvo.

 

Créditos:

 

' Apple~*

Zuian Pelo Tutorial

 

Eu Pelo Post

[kolo86 0]

otimo topico tutorial maneiro muito bom .

 

 

pra mim merece topico fiixo.:D

[HoruS* 22]

@kolo86

 

vlw por ter gostado estarei postando mais tutoriais

[seupai22 0]

\o/ esse deve ir para o Fixo²

 

é nóis By: Corey Taylor

 

 

[jenativa 0]

Cara eu nao consigo abri o form 1 aonde eu clico para abrir??

[skbe 0]

consegui Vlw manow

!!!!

Muito eficiente

 

 

[darkninho 2]

Cara muito bom

vai mim ajuda muito fazer meu gerador de cash

topico com SS muito bem explicado

muito bom msm