Fórum form na frente #230411
06/05/2004
0
//para deixar o sistema sempre em primeiro plano
SetWindowPos(f_adm_avisa_bloco.handle, HWND_TOPMOST, f_adm_avisa_bloco.Left, f_adm_avisa_bloco.Top,f_adm_avisa_bloco.Width, f_adm_avisa_bloco.Height, 0);
Briciosm
Curtir tópico
+ 0Posts
06/05/2004
Avante
Mude o FormStyle para fsStayOnTop e use
Messagebox(handle,´text´,´caption´,Mb_TaskModal+Mb_Ok);
Gostei + 0
06/05/2004
Cebikyn
Ao invés de Application.MessageBox, use:
MessageBox(f_adm_avisa_bloco.handle, ´texto´, ´titulo´, flags);
[b:98c6845744]Outra dica:[/b:98c6845744]
A chamada:
SetWindowPos(f_adm_avisa_bloco.handle, HWND_TOPMOST, f_adm_avisa_bloco.Left, f_adm_avisa_bloco.Top,f_adm_avisa_bloco.Width, f_adm_avisa_bloco.Height, 0);
pode ser substituida por:
SetWindowPos(f_adm_avisa_bloco.Handle,HWND_TOPMOST,0,0,0,0,SWP_NOSIZE+SWP_NOMOVE);
Isto evita chamadas desnecessárias às propriedades do form e simplifica seu código.
[b:98c6845744]Detalhe:[/b:98c6845744] é muito mais eficiente usar SetWindowsPos do que mudar a propriedade FormStyle...
Gostei + 0
06/05/2004
Avante
Essa eu não sabia. Pode me explicar o porque?
[]´s
Gostei + 0
06/05/2004
Cebikyn
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)