Form MDI com Form de Login

Question

Pessoal deparei com a seguinte situa��o que n�o estou conseguindo resolver:Tenho uma aplica��o com o FormPrincipal do Tipo MDIFormos Forms de cadastro est�o como MDIChildestou abrindo os forms decadas...

Lucas Silva · Answer

Coloque o enable do form principal, como false!...

Adilsond · Answer

Isto n�o funciona. Fa�a um teste passo a passo e verifique que seu form ser� destru�do logo ap�s o mesmo ser criado, posi o show mostra o form e passa para o comando seguinte, diferente do showmodal que aguarda o form ser fechado.

try
FormVendedor.show; // ser� executado e passa para a pr�xima linha
except
FormVendedor.Free;
FormVendedor := nil;
end;

Gabriel Ferrarini · Answer

Mas se ele est� entrando no Except � porque deu algum erro na hora de criar.

Tente o seguinte: No OnCreate do form principal, voc� cria o seu form de login e d� um showmodal nele. E o form de login n�o precisa ser MDIChild caso voc� esteja colocando assim.

Gabriel.

Lucas Silva · Answer

[quote:e2fc0352ca=�Lucas Alves Silva�]Coloque o enable do form principal, como false![/quote:e2fc0352ca]E na propriedade FORMSTYLE do form de login coloque fsStayOnTop...

Ariovaldo · Answer

Pessoal ainda estou com problemas, Coloquei o Form conforme conforme o Lucas j� havia me orientado

[b:f75ef2f3d1]Lucas Alves Silva escreveu:
Coloque o enable do form principal, como false!

E na propriedade FORMSTYLE do form de login coloque fsStayOnTop[/b:f75ef2f3d1]

Agora o Form de login aparece e estou logando normalmente pore�m ao clicar no menu principal a aplica��o retorna erro que n�o pode criar o form mDI, estou com a seguinte estrutura:

Form Login Propriedade FormStyle = fsStayOnTop
FormPrincipal Propriedade FormStyle = MDIForm
Forms de Cadastro propriedade Formstyle = MDIChild

estou acessando os forms que d�o erro com o seguinte comando :
if (not assigned(FormVendedor)) or (FormVendedor = nil) then Begin
FormVendedor := TFormVendedor.create(application);
End;
try
FormVendedor.show;
except
FormVendedor.Free;
FormVendedor := nil;
end;

Ariovaldo · Answer

Pessoal ainda estou com problemas, Coloquei o Form conforme conforme o Lucas j� havia me orientado

[b:f75ef2f3d1]Lucas Alves Silva escreveu:
Coloque o enable do form principal, como false!

E na propriedade FORMSTYLE do form de login coloque fsStayOnTop[/b:f75ef2f3d1]

Agora o Form de login aparece e estou logando normalmente pore�m ao clicar no menu principal a aplica��o retorna erro que n�o pode criar o form mDI, estou com a seguinte estrutura:

Form Login Propriedade FormStyle = fsStayOnTop
FormPrincipal Propriedade FormStyle = MDIForm
Forms de Cadastro propriedade Formstyle = MDIChild

estou acessando os forms que d�o erro com o seguinte comando :
if (not assigned(FormVendedor)) or (FormVendedor = nil) then Begin
FormVendedor := TFormVendedor.create(application);
End;
try
FormVendedor.show;
except
FormVendedor.Free;
FormVendedor := nil;
end;

Wolverine · Answer

eu tenho um exmplo de com Form de Login, c quiser me passe um email...

F�rum Form MDI com Form de Login #264564