Sistema de Login Para Seus trainers

['Lenneth 487]

Ola Galera Da WC tudo Batuta?

Hj Vou Ensinar a Criar Um Sistema de Login basico Para Seus Trainers

 

1" Abre Seu Delphi

2'' *** Isso Na sua as ****

 

2 L a b e l ,,,2 Edit,,,e 1 Buttao ,,, 1 ProgressBar e um Bevel concerteza nao pode falta um Xpmain

 

Depois de Colocado Os Itens Citado ae em cima

 

Renomeia as 2 L a b e l"""

UserName e a Outra Passwords

 

depois feito isso citado acima

deixei o meu assim veja a foto

 

 

depois e hora de Por Os Codes""

 

No Buttao1 Clike 2 vezes e *** Isso

 

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

• Entre
• ou
• Cadastre-se

 

Nao Se Esqueça de Abrir um **** q sera a Form2 Para Seus Trainer e Outro Aplicativos

 

"Agora No E d i t 2 Na Propiedades PasswordChar Mude Para *

 

Agora So Compiliar e testar

 

Feito Por Min Mesmo aqui esta a foto do projeto como q fico

 

Vlws ae Web Cheats

 

GOsto? Agradece ai Nao Custa Nds ne!

 

Nao Intendeu Releia Por Favor

 

Sorry Pelo Portugues

[Grilo~* 0]

Método simples, e posso quase que afirmar como "não funcional" já que é muito fácil abrir um aplicativo desse em um debugger e achar a senha e o login, descaradamente,

Um dos melhores métodos é pegar a senha e o login, de um host seu, senhas mudaveis e logins também, encryptar o link do host com um simples função e depois usar um bom pack.

Boa noite.

[# Sasuke ~ 0]

Valeu cara !

[gaabscps 7]

Só corrigindo e complementando...

 

ProgressBar1.Position:=10; //Não é a porcentagem em sí. Apenas a posição do progresso. Se eu alterar o valor máximo para 50, por exemplo, deixará de aumentar 10% para aumentar 20%

sleep (100); //Entre os parênteses é o tempo que o status vai demorar pra andar

repeat //Mesmo melhoramento que fiz em outro tópico...

progressbar1.Position := progressbar1.Position + 20;

sleep(100);

until progressbar1.Position = progressbar1.Max;

if (Edit1.text = 'OMG')and(Edit2.text = 'OMG') then // Usuario e Senha

begin

ShowMessage('Logado com Sucesso !'); // Se acertar o Login !

Form1.Hide; // Deixa o Form1 Invisivel.

Form2.Show; // Mostra o Form2

end

else

ShowMessage('Usuário ou Senha Incorreto !'); // Se estiver algo Errado !

end;

['Lenneth 487]

Só corrigindo e complementando...

 

Obrigado por Corrigir

[4444leozinho4444 0]

Pow parabéns apesar de que já tem pra criar um sistema tipo esse acho que não tem pra botar essa progressbar.