Protegendo aplicação com sistema de login.

[Mr.kuki 0]

Estarei ensinando aqui a proteger uma aplicação em Delphi através de um Login e Senha pré-programados, ou seja, uma Form1 com Login e Senha que irá proteger uma Form2 com o programa que você quer proteger de outras pessoas.

 

O que você vai precisar:

 

2 Labels

2 Edits

1 Button

 

Tutorial parte 1:

Clique duas vezes no Button da qual você colocou no Form e coloque a seguinte source:

 

 

Código HTML:

 

// Caso os campos estejam em branco e o Button seja ativado, ele mostrará o seguinte erro:

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

begin

Application.MessageBox('Campos em Branco, favor preenche-los.','Erro!',MB_ICONError);

Edit1.Clear;

Edit2.Clear;

Edit1.Setfocus;

end;

// Caso os campos estiverem sendo preenchidos, a verificação ira continuar:

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

begin

// Crie um login e uma senha e preencha eles na source no lugar de SEU LOGIN e SUA SENHA.

// Se tudo estiver correto, ele abrirá o segundo form.

if (Edit1.text = 'SEU LOGIN')and(Edit2.text = 'SUA SENHA') then

begin

Form2 := Tform2.create(application);

Hide;

Form2.showmodal;

end;

// Se der erro no preenchimento, irá aparecer uma tela em branco.

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

begin

Application.MessageBox('Sua senha ou seu login estão incorretos.','Erro!',MB_ICONError);

Edit1.Clear;

Edit2.Clear;

Edit1.Setfocus;

end;

end;

 

Tutorial parte 2:

 

Agora o trabalho ficou pronto, mas logicamente não da para testar, o que você terá que fazer então:

File > New > Form

Após adicionar uma nova form, vá na aba EVENTS e clique duas vezes na OnClose, entre Begin e End. escreva: Halt;

 

Pronto, agora pode testar sua aplicação tranquilamente, ao colocar o login e senhas corretos, o programa ira abrir o Form2, e é nesse form que você ira fazer o que bem desejar.

 

 

 

Creditos: Mr.kuki

[' hard~* 1]

Muito bom, eu já havia postado este :

http://www.webcheats.com.br/forum/delphi-vb/1528290-tutorial-source-sistema-login-sem-banco-de-dados.html

Só que o código do seu é mais completo, tópico bem organizado !

Simples e fácil de se fazer :smiley:

 

Abraços !

[Mr.kuki 0]

Muito bom, eu já havia postado este : http://www.webcheats.com.br/forum/delphi-vb/1528290-tutorial-source-sistema-login-sem-banco-de-dados.html

Só que o código do seu é mais completo, tópico bem organizado !

Simples e fácil de se fazer :smiley:

 

Abraços !

 

 

vlw manin..um abraço

[Matador960 3]

Rídiculo, além de copiar a source e até todo o conteúdo com minhas próprias imagens, esqueceu de dar os devidos créditos.

 

Post original:

http://www.webcheats.com.br/forum/delphi-vb/1489597-tut-protegendo-aplicacao-por-login-e-senha.html

 

Se você não tem capacidade suficiente de criar sua própria source sem copiar a dos outros, ou criar um post decente com os devidos créditos, aconselho a sair da área de Delphi!

 

Muito bom, eu já havia postado este : [Tutorial + Source] Sistema Login sem banco de dados !

Só que o código do seu é mais completo, tópico bem organizado !

Simples e fácil de se fazer

 

Abraços !

 

Hard, agradecendo a você, estudei a sua source na qual você postou na webcheats e a tornei um pouco menor e mais fácil de ser criada.

[' hard~* 1]

Bom, conteúdo existente ...

Tópico Original : http://www.webcheats.com.br/forum/delphi-vb/1489597-tut-protegendo-aplicacao-por-login-e-senha.html

 

Abraços ...