Hola a todos!
Quiero saber qué debo hacer para que las pantallas se ajusten a la resolución que tenga predeterminado el computador y no definidas por código, ya que quedaría restringido a una específica ejm 800*600 etc.
Gracias por la ayuda.
| |||
![]() Hola a todos! Quiero saber qué debo hacer para que las pantallas se ajusten a la resolución que tenga predeterminado el computador y no definidas por código, ya que quedaría restringido a una específica ejm 800*600 etc. Gracias por la ayuda. |
| |||
Asi:
Código:
Dim form As New frmInicio Dim w As Integer = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width Dim h As Integer = System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height Dim original As New Drawing.Bitmap("rutadelaimagen.extension") If w = 800 Then Dim fondo As New System.Drawing.Bitmap(original, 799, 510) Me.BackgroundImage = fondo Else Dim fondo As New System.Drawing.Bitmap(original, 1029, 690) Me.BackgroundImage = fondo End If |