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 sistema de login em seu programa (pode ser usado em seu hacker)


arthur157xx
 Compartilhar

Posts Recomendados

oi galera da webcheats joia? estou muito feliz por ter conseguido isso!! agora si vc tiver o seu hacker i quiser fazer o login e a senha para ele? fique a vontade!!!!!

 

Tuto

Neste tutorial criaremos um formulário de login em seu programa, para que você possa proteger seu sistema impedido a entrada de pessoas não autorizadas.

 

Para criarmos o formulário de login, serão utilizados conceitos avançados, portanto, leia as outras colunas dos programadores de Delphi aqui da nossa Oficina.

 

 

Abra o Delphi

 

gd_abri_delphi.jpg

Adicione 2 Labels, 2 Edits e 1 Button.

 

Altere:

Caption do Label1 = “Usuário: ” (sem as aspas)

Caption do Label2 = “Senha: ” (sem as aspas)

Caption do Button1 = “Acessar” (sem as aspas)

Text dos 2 Edits = “”(sem as aspas)

 

gd_user_01.jpg

 

Clique 2 vezes no button1 e coloque esse codigo:

// Se os campos estiverem em branco, mostra o erro…

 

if (Edit1.text = '')and(Edit2.text ='') then

 

begin

 

Application.MessageBox('Preencha os campos de maneira adequada, por favor.','Erro!',MB_ICONError);

 

Edit1.Clear;

 

Edit2.Clear;

 

Edit1.Setfocus;

 

end;

 

// Se os campos não estiverem em branco, Continua com a verificação...

 

if (Edit1.text <> '')and(Edit2.text <> '') then

 

begin

 

// Verifica se o campo usuário estiver com o valor: gabriel e o campo senha: 123…

 

// Se estiver tudo correto abre o Form2

 

if (Edit1.text = 'gabriel')and(Edit2.text = '123') then

 

begin

 

Form2 := Tform2.create(application);

 

Hide;

 

Form2.showmodal;

 

end;

 

// Se tiver algum problema na verificação, mostra uma mensagem e limpa os campos...

 

if (Edit1.Text <> 'gabriel')or(Edit2.text = '123') then

 

begin

 

Application.MessageBox('Sua senha esta incorreta!','Erro!',MB_ICONError);

 

Edit1.Clear;

 

Edit2.Clear;

 

Edit1.Setfocus;

 

end;

 

end;

 

Agora crie um novo form.

Para isso:

Entre no menu File>New e clique em Form

 

gd_user_new_form.jpg

 

Clique no Form2, clique na aba Events dentro da janela object inpector, procure o evento OnClose, dê um duplo clique no campo vazio ao lado do evento. Irá abrir a janela de código, dentro dessa janela coloque o código:

 

''Halt;'' sem aspas.

 

gd_user_terminate.jpg

 

Agora é só apertar o F9 para testar.

Terminado o processo.

A partir de agora para acessar o seu programa não esqueça que terá que digitar seu login e senha e se alguém quiser usá-lo sem sua prévia autorização, pode desistir.

 

Até a próxima pessoal.

Qualquer duvida pessoal me add no msn: [email protected]

Em Breve Uma Video Aula.

By: arthur157xx

Link para o comentário
Compartilhar em outros sites

Gostei, mesmo não entendendo nada de programação ainda, entendi um pouco.

Mas se por acaso eu queria fazer que alguém possa Criar uma conta, e que ela fique registrada online e a pessoa possa entrar normalmente e usar o hacker, e como criar o Loader.

Bom, enfim, é dúvidas que aparecem, vai ser bom para aqueles que pensam em fazer seu hack com um sistema de contas.

 

Levou meu Thanks .

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.