colocando form criado sempre a frente...
09/02/2006
0
Pessoal, tenho uma aplicação toda na estrutura onde é assim:
- form principal = FormStyle = fsMDIForm
- Demais Forms = FormStyle = fsStayOnTop
Isso se deve ao cliente na hora em execução não precisar fechar uma determinada
tela em exibição para entra em outra. E em todas são aplicadas o evento (show) e
não o (showmodal).
Acontece que algumas vezes uma tela não vem pela frente da outra e fica por trás
da tela anterior já aberta.
Gostaria de saber qual o código que devo utilizar para impreterivelmente os forms
a serem criados possam ser exatamento exibidos na frente da tel aberta.
Todos os forms estão configurados com disse acima.
Só a nível de conhecimento estou postando o código do evento de chamada no form principal.
If Frm_Clientes00 = nil Then
Frm_Clientes00 := tFrm_Clientes00.Create( Application );
Frm_Clientes00.Show;
:oops:
- form principal = FormStyle = fsMDIForm
- Demais Forms = FormStyle = fsStayOnTop
Isso se deve ao cliente na hora em execução não precisar fechar uma determinada
tela em exibição para entra em outra. E em todas são aplicadas o evento (show) e
não o (showmodal).
Acontece que algumas vezes uma tela não vem pela frente da outra e fica por trás
da tela anterior já aberta.
Gostaria de saber qual o código que devo utilizar para impreterivelmente os forms
a serem criados possam ser exatamento exibidos na frente da tel aberta.
Todos os forms estão configurados com disse acima.
Só a nível de conhecimento estou postando o código do evento de chamada no form principal.
If Frm_Clientes00 = nil Then
Frm_Clientes00 := tFrm_Clientes00.Create( Application );
Frm_Clientes00.Show;
:oops:
Thiagopedro
Curtir tópico
+ 0
Responder
Posts
09/02/2006
Leonardobhbr
Istro deve resolver
SetForeGroundWindow(Formulario.Handle);
SetForeGroundWindow(Formulario.Handle);
Responder
Clique aqui para fazer login e interagir na Comunidade :)