Fórum SENHA? #168745

10/07/2003

0

Preciso de um exemplo de senha

onde o usuário digite a senha e acessa o sistema

Não precisa ser muito complexo, mas também nem muito simples

obrigado


Rafael Santana

Rafael Santana

Responder

Posts

10/07/2003

Ropesca

Faça assim.
Crie uma tabela paradox com os campos Usuario(chave primaria) e senha
OS campos devem ser A e N.
No form que vc quer criar o login insira dois edits e um button. Insira tambem uma table da paleta bde. Especifique Databa name, e table name, e clique em active = true. Insira os campos dentro da tabela clicando com o botao direito emcima da tabela e escolhendo fieldeditor.
Dentro da janela que se abriu, clique de novo com o botao direito, e clique em add fields, e adicione os dois campos.
No evento onclick do button, digite o seguinte codigo:

begin
if not table1.findkey([edit1.text]) then
messagedlg (´Usuario invalido´, mterror, [mbok], 0)
else
if not (table1senha.value = edit2.text) then
messagedlg (´Senha invalida´, mterror, [mbok], 0)
else
begin
form2.showmodal;
end
end;


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar