What do you exactly mean?

check out this sample program.
don't forget to give your geedback.

Hi,

You dont need an API to know the Resolution.., Use Screen Object of VB:


Regards
Veena

Instead of using the constant 15 isn't it safer to use screen.twipsperPixelX and Screen.TwipsPerPixelY ?

Yes, use twipsperpixel... I recently found this changed on wide-screen flat panels, and if you don't adjust for it, some elements on your forms will look crappy.

I have the same issue. What I want to detect is the actual operating system under the control panel and detect that windows settings so that I can tell the user change the resolution. The screen method does not seem to work well. i have tested my code where I changed the resolution to a lower resolution, and someone made the comment the program looks crappy!

I agree. There's got to be a way to detect under start->Control Panel->Display->Settings-> screen Resolution Slide bar.

The specific question is how to fetch that resolution and evaluate it in your code? The dumb way would be to have a dialog box and tell the user to change it, but more elegant would be a way to detect it.

Does anyone know how to do this? There's got to be an API to acces that in the OS.

Regards,
Rj

Yes, the SysInfo control has an event called DisplayChanged which fires when the screen resolution has been changed. It has many others, including one for SysColorsChanged, several for battery status, power changes and device arrival/removal.

The answer to everyone's request is here. I knew there was an API out there to do so. this website has it http://cuinl.tripod.com/Tips/get_scr...olutionAPI.htm


1. Download the API-GUIDE. Neat utility for all windows API and sample code. google it
http://www.devhood.com/Tools/tool_de...px?tool_id=563


Make a module and dump this code

Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As Long
Public Const SM_CXSCREEN = 0
Public Const SM_CYSCREEN = 1

Make a form and dump it on the Form_Load() procedure.

Private Sub Form_Load()
Dim Tmp As String
Tmp = GetSystemMetrics(SM_CXSCREEN) & _
"x" & GetSystemMetrics(SM_CYSCREEN)
MsgBox (Tmp)
End Sub

You will see that you can get the information you need.

RJ

yes I believe i ve tried using the code already ====
====
all you really need is to discover controls in Visual Basic..

heres the code ive used:
i used it in the module so that i could easily call it:

Public Function ScreenResolution(f As Form) As String

Dim iWidth As Integer, iHeight As Integer

iWidth = Screen.Width \ Screen.TwipsPerPixelX
iHeight = Screen.Height \ Screen.TwipsPerPixelY
ScreenRes = iWidth & " X " & iHeight

End Function

gr3en39@gmail.com