Programación General > Visual Basic 6.0 e inferiores

 Re: Cambiar el tamano del frm segun la resolucion

(1/1)

Voro:
Hola
He creado un pequeña aplicacion con la configuracion de pantalla de mi ordenador actual al instalarlo en el antiguo a ver si funcionaba me encuentro con que el formulario no cabe en pantalla al ser una resolucion mas baja.
Preguntas:
¿Hay alguna forma facil de arregarlo?
¿Como puedo saber la resulucion de pantalla para configurar las dimensiones?

Por cierto el programa funciona

Gracias de antemano y un saludo

J.M.Movilla:
¿Te sirve este código?

Saludos y suerte

Majuhemo:
Hola:
mira, lo que puedes hacer es detectar que resolucion tiene la pc y si no es como tu la diseñaste la cambias y al salir retornas a la resolucion por defecto.

Para saber que resolucion es:

Private Sub Command1_Click()
    Dim XTwips As Long
    Dim YTwips As Long
    Dim XPixels As Long
    Dim YPixels As Long

    XTwips = Screen.TwipsPerPixelX
    YTwips = Screen.TwipsPerPixelY

    YPixels = Screen.Height / YTwips
    XPixels = Screen.Width / XTwips

    Text1.Text = Str$(XPixels) + " x " + Str$(YPixels)
End Sub

Mas detalle hay en este pagina..

http://guille.costasol.net/api/resolucionpantalla.htm

saludos;

Voro:
Gracias por las soluciones he probado las dos y funciona pero no es lo que yo suponia.
 la proxima vez con una aplicacion nueva teniedolo en cuenta me seran positivas para pader relizar la instalacion con cualquier resolucion.
De todas  formas muchas gracias

Navegación

[0] Índice de Mensajes