Tela de LOGIN (Agrade�o se postarem um exemplo pr�tico)

Question

Meus Amigos,Procurei por todo o f�rum mais as explica��es colocadas n�o funcionaram.Estou tentando colocar uma tela de Login em minha aplica��o e n�o sei porque n�o est� funcionando.Sei que tem os mac...

Ariovaldo · Answer

Cara tenho isso pronto e funcionando, claro que n�o 100� como vc quer m�s diria 98� me passa um email para ari_ferreira@ig.com.br que te mando...

Alexsandro · Answer

Obrigado pela Ajuda Ari,Se algu�m mais puder colaborar eu agrade�o. Depois eu vou postar como ficou o meu exemplo.Alex...

Cristiam · Answer

www.condominios.com.br/site/login.aspxFiz em delphi 2005 com Forms Authenthication, n�o sei se � isso q vc quer...

Alexsandro · Answer

Oi Crsitiam,No meu caso n�o uso internet...Minha aplica��o � Local com Access via ADO. Obrigado mesmo assimAlex...

Emerson Nascimento · Answer

mande um email para emerson.en@ig.com.br que eu te mando um pequeno exemplo que eu fiz....

Quadrado · Answer

No evento FormShow do formul�rio principal eu coloco

   if not Assigned(fmLogon)then
      Application.CreateForm (TfmLogon,fmLogon);
   try
      fmLogon.ShowModal
   except
      Application.Terminate;
   end;

   if not fmLogon.lAtivo  then
      fmPrincipal.Close;

No arquivo de projeto fica na seguinte ordem

      Application.Initialize;
      Application.CreateForm(TfmPrincipal, fmPrincipal);
      Application.CreateForm(TfmLogon, fmLogon);
      Application.CreateForm(TdmADOConexao, dmADOConexao);

Assim a primeira tela que aparece � o formul�rio de Logon.
Dentro do formul�rio da unit de Logon realizo todas as verifica��es necess�rias, inclusive verificar em tabela espec�fica o logon do �ltimo acesso. Se o acesso for aceito, lAtivo := True e fecha o formul�rio de logon, caso contr�rio o programa encerra.

Eu uso assim e funciona direitinho.

Boa sorte.

Quadrado

F�rum Tela de LOGIN (Agrade�o se postarem um exemplo pr�tico) #272918