Problem beim skalieren des Bildschirms

[rawi]

Hallo Steffen,

auslesen kann man mit ...

Delphi-Quellcode:

{ returns TRUE if  small fonts are set, FALSE if using Large Fonts }
var
  DC: HDC; { used to check for number of colors available }
begin
  DC := GetDC(0);
  if GetDeviceCaps(DC, LOGPIXELSX) = 96 then
    ....
  else
    ....;

  { LOGPIXELSX will = 120 if large fonts are in use }
  ReleaseDC(0, DC);
end;