Risoluzione video

[Carmen]

Ciao;

Avrei bisogno di un metodo semplice per poter leggere la risoluzione video in VB impostata in modo chè a seconda della risoluzione possa fare delle scelte.

Es.
800 x 600 -> Eseguo questo
1020 x 768 -> Eseguo quest'altro
etc...


Grazie. Carmen

[cionci]

Vai su msdn.microsft.com e cerca SystemParametersInfo...l'opzione che ti itneressa è SPI_GETWORKAREA...

[matpez]

Ah no cionci, sta volte ti complichi la vita, è molto più semplice:

Dim nX As Integer
Dim nY As Integer


nX = Screen.Width / Screen.TwipsPerPixelX
nY = Screen.Height / Screen.TwipsPerPixelY

Select Case nX & "x" & nY
Case "800x600"
MsgBox "ciao"
Case "1024x768"
MsgBox "bho"
End Select

[cionci]

Sai che non conosco VB ;)

[matpez]

Si :p


:ubriachi: :gluglu: :ave:

[Carmen]

OK!

Grazie mille!!!! ;)