Resolution of monitor

[Natter]

Hi,

The resolution of my monitor is 1920 x 1080. However, the ScrResolution() function returns
{ 1536, 864 }. Why ?

[Rick Lipkin]

Natter

Try it this way ...

Code: Select all | Expand

nSCR1 := GetSysMetrics(0)
nSCR2 := GetSysMetrics(1)
 

This will give you the horizontal and vertical resolution ...

Rick Lipkin

[Natter]

I tried it. Getsystemmetrics returns the same values. Mysticism

[hmpaquito]

viewtopic.php?f=3&t=40901&p=244894&hilit=monitor&sid=e6f0f91c756601dcbc3df2d2ebdf723c#p244894

[Natter]

So what ?

[dutch]

Hi Natter,

Because of Display Setup (Scale and Layout is 125%)

Hi,

The resolution of my monitor is 1920 x 1080. However, the ScrResolution() function returns
{ 1536, 864 }. Why ?

[Natter]

Yes, dutch, you're right. Thanks !

Can I get this scale from FWH ?

[Marc Venken]

I believe that Uwe found a solution in this topic ....

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=34845&hilit=scale+monitor&sid=581ff73d708640259f7dd5d859b26a12

[driessen]

Is there a function that can read the scaling of your desktop?

Thanks.

[Natter]

It is not possible to get DPI yet. It might be worth trying in the registry

[Jimmy]

hi,

there are different Way to get Scale-Factor.

for single Monitor you can use "real" / "virtual" Desktop Size to get Scale-Factor

Code: Select all | Expand

#define HORZRES              0x0008   // (  8) Horizontal width in pixels
#define VERTRES              0x000A   // ( 10) Vertical width in pixels
#define LOGPIXELSX           0x0058   // ( 88) Logical pixels/inch in X
#define LOGPIXELSY           0x005A   // ( 90) Logical pixels/inch in Y
#define DESKTOPVERTRES       0x0075   // (117) Vertical height  of entire desktop in pixels
#define DESKTOPHORZRES       0x0076   // (118) Horizontal width of entire desktop in pixels

Function GetDeskSize(nHDC,lVirtual)
LOCAL nWidth,nHeight
   nWidth  := HMG_CallDLL('GDI32.dll', DLL_OSAPI, 'GetDeviceCaps', nHDC, iif(lVirtual, HORZRES, DESKTOPHORZRES))
   nHeight := HMG_CallDLL('GDI32.dll', DLL_OSAPI, 'GetDeviceCaps', nHDC, iif(lVirtual, VERTRES, DESKTOPVERTRES))
RETURN{nWidth,nHeight}
 

---

for multi-Monitor you need

MonitorFromWindow https://docs.microsoft.com/en-us/windows/win32/api/winuser/nf-winuser-monitorfromwindow
GetScaleFactorForMonitor https://docs.microsoft.com/en-us/windows/win32/api/shellscalingapi/nf-shellscalingapi-getscalefactorformonitor
DEVICE_SCALE_FACTOR https://docs.microsoft.com/en-us/windows/win32/api/shtypes/ne-shtypes-device_scale_factor

GetScaleFactorForDevice is IMHO outdate
https://docs.microsoft.com/en-us/windows/win32/api/shellscalingapi/nf-shellscalingapi-getscalefactorfordevice

[Natter]

Jimmy, great! GetDeviceCaps(DC, 117/118) works correctly

[karinha]

Hi Jimmy, how do I do this in FiveWin? I don't use HMG.

Hola Jimmy, ¿cómo hago esto en FiveWin? No uso HMG.

Regards, saludos.

[Jimmy]

hi karinha,

how do I do this in FiveWin? I don't use HMG.

FiveWin have in c:\fwh\source\winapi\device.c

Code: Select all | Expand

HB_FUNC( GETDEVICECAPS )     //  ()    HDC, int iIndex

so as Natter wrote use

Code: Select all | Expand

#define DESKTOPVERTRES       0x0075   // (117) Vertical height  of entire desktop in pixels
#define DESKTOPHORZRES       0x0076   // (118) Horizontal width of entire desktop in pixels

   Vertical   := GetDeviceCaps(DC, 0x0075) 
   Horizontal := GetDeviceCaps(DC, 0x0076)

[karinha]

Hola Jimmy, ¿puedes hacer un ejemplo completo y funcional? Necesito cambiar la RESOLUCIÓN DEL VIDEO a 1280x768 en tiempo real y luego volver a la RESOLUCIÓN DEL CLIENTE como estaba antes. ¿Es posible o no?

Hi Jimmy, can you make a complete and working example? I need to change the VIDEO RESOLUTION to 1280x768 in realtime, and then go back to CLIENT RESOLUTION as it was before. Is it possible or not?

WINDOW 7 and WINDOWS 10 please.

Gracias, thanks.

Origen:

http://forums.fivetechsupport.com/viewtopic.php?f=6&t=42143&sid=f7177597dbec68af574f19f84a5e1875

Regards, saludos.