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

 



Responder a