WinVista/7 Changed dpi Tips

[oryaaaaa]

I checked Win7 JP 32bit. for gadget, menu and 2D drawing.

Code: Select all

Procedure.i Gui_GetDesktopDpiX() 
  Protected hdc.i
  Protected hDpi.i 
  hdc = GetDC_(GetDesktopWindow_())
  If hdc
    hDpi = GetDeviceCaps_(hdc, #LOGPIXELSX)
    ReleaseDC_(GetDesktopWindow_(), hdc)
  EndIf
  ProcedureReturn hDpi
EndProcedure

Global ScreenDpi.f
ScreenDpi = 96/Gui_GetDesktopDpiX()

FontID1 = LoadFont(1, "FONT", Round(18*ScreenDpi, #PB_Round_Nearest))

[IdeasVacuum]

Great tip!

[oryaaaaa]

150% Menu Font Problems. I want to fix by PB.