POSICIONAR FORMS
Olá pessoal !
Eu me deparei com um probleminha. Os monitores do meu cliente são daqueles [Ô]Plug and Play em NVidia GetForce 6100 Force 1024 por 768 Pixels[Ô].
E acontece que eu desenvolvi o sistema da seguinte forma, eu tenho um form principal fixo e todos os demais eu uso com a BorderStyle= none. E eles são chamados e fixados na tela principal. Como usei nos forms secundários, [Ô]me.top[Ô] e [Ô]me.left[Ô] para posicioná-los no form principal, nestes monitores 1024x768 fica meio fora do planejado.
Como que eu faço para posicionar todos os forms secundários no centro, de acordo com a resolução do monitor ?
é possÃvel criar ou existe alguma função que eu coloque no módulo e faça o ajuste em todos os forms, ou ainda, que eu defina nesta função, em quais forms eu quero o ajuste ?
Desde já agradeço a ajuda.
Eu me deparei com um probleminha. Os monitores do meu cliente são daqueles [Ô]Plug and Play em NVidia GetForce 6100 Force 1024 por 768 Pixels[Ô].
E acontece que eu desenvolvi o sistema da seguinte forma, eu tenho um form principal fixo e todos os demais eu uso com a BorderStyle= none. E eles são chamados e fixados na tela principal. Como usei nos forms secundários, [Ô]me.top[Ô] e [Ô]me.left[Ô] para posicioná-los no form principal, nestes monitores 1024x768 fica meio fora do planejado.
Como que eu faço para posicionar todos os forms secundários no centro, de acordo com a resolução do monitor ?
é possÃvel criar ou existe alguma função que eu coloque no módulo e faça o ajuste em todos os forms, ou ainda, que eu defina nesta função, em quais forms eu quero o ajuste ?
Desde já agradeço a ajuda.
Veja se te ajuda essa funcao
para usar coloque no load do form que quiser
Call CetralizarForm(Me)
Function CetralizarForm(Form As Form)
[ô]Luiz Comino 11/05/2015
Form.Top = (Screen.Height - Form.Height) / 2
Form.Left = (Screen.Width - Form.Width) / 2
End Functionpara usar coloque no load do form que quiser
Call CetralizarForm(Me)
Tópico encerrado , respostas não são mais permitidas