Foro de elhacker.net

Programación => Programación Visual Basic => Mensaje iniciado por: ジ en 27 Julio 2006, 18:03 pm



Título: Colocar form segun tamaño de la screen
Publicado por: en 27 Julio 2006, 18:03 pm
buenas, pues ando en esas, necesito calcular el tamaño de cada monitor donde se ejecute mi aplicacion, para que muestre a la misma altura un formulario, osea que muestre tanto en un monitor de 15 pulgadas como en uno de 17 la aplicacion en el mismo sitio de la screen, ( 15 y 17 pulagadas lo puse como ejemplo de + y - ) pues eso es todo, salu2. ;)


Título: Re: Colocar form segun tamaño de la screen
Publicado por: LuckyMonkey en 27 Julio 2006, 18:18 pm
ancho=screen.width / screen.twipsperpixelx
alto=screen.height  / screen.twipsperpixely

Eso considerando que tienes el scalemode a twips te dará la resolución actual.


Título: Re: Colocar form segun tamaño de la screen
Publicado por: _Sergi_ en 29 Julio 2006, 18:17 pm
Bueno, lo que te ha dicho LuckyMonkey, "metido" en una función que devuelva una string procesada con la resolución y asegurandonos que está bien el scalemode sería algo así:

Código:
Public Function ObtenerResolucion(Formulario as Form) As String
Formulario.Scalemode = vbTwips 'Ponemos el scalemode a twips
'Calculos
Ancho = Screen.Width / Screen.Twipsperpixelx
Alto = Screen. Width / Screen.Twipsperpixely
'Devolvemos el valor
ObtenerResolucion = "Resolución: " & Ancho & " x " & Alto & " píxeles"
End Function

Un saludo