Isso está sendo feito. Eu até criei uma variável global, mas antes disso dá o erro na abertura utilizando o ShowModal.
Sds, Romario Osmar de Souza Júnior escreveu: > > > mas acho que eh ai que está o erro. > naum sei se entendi, mas está tentando criar a janela principal a > partir da janela de login ??? > > se for isso, provavelmente após o usuário clicar em OK, a janela de > login é "destruida", dependendo de como estiver implementado, pode dar > pau. > > voce pode fazer a variavel Acessar_Sistema uma variavel global, e a > classe usuario pode seta-la para true, quando o usuário tiver acesso. > > > --- Em delphi-br@yahoogrupos.com.br, "Romario (Listas)" > <[EMAIL PROTECTED]> escreveu > >>Osmar, >> >>Agradeço pela sua resposta, mas ainda continuo sem obter sucesso. > > Quando > >>efetuo o ShowModal é gerada uma exceção que encerra a minha aplicação. >> >>Estou utilizando da seguinte forma: >> >>Quem faz a verificação da permissão de acesso é a Classe Usuário que >>informa à janela de login se ele possui ou não direitos de acesso. >> >>Explico: >> >>Quando o usuário clica no botão de OK (após preencher os campos de >>usuário e senha), eu chamo um método na classe "Usuario" que acessa as >>regras de negócio no datamodule "Usuario" e verifica no banco de dados >>se esse usuário possui permissão de acesso. O retorno dessa função é um >>booleano e faz com que a janela de login tome a decisão de abrir ou não >>a janela principal de acordo com o valor retornado. >> >>Como vê, tudo isso está dentro dos métodos criados no formulário de >>login e não são acessados através da Unit do Programa. >> >>Mais alguma dica? >> >>Obrigado! >> >>Sds, >> >>Romario -- <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos <*> Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ <*> Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] <*> O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html