Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  AW: Textgröße (Windows 11, Barrierefreiheit)

   
    by Aliquis, 22. Aug 2023
  Falls du nicht die Fontgröße, sondern die eingestellte Skalierung (bei mir z.B. 175) wissen willst, hilft vielleicht so etwas:
  
  function GetFontScaling(Handle: THandle): Integer;
  begin
  var Monitor := Screen.MonitorFromWindow(Handle);
  { var Monitor := Screen.MonitorFromPoint(Pnt);
  var Monitor := Screen.MonitorFromRect(Rect);
  }
  Result := Round(Monitor.PixelsPerInch*100/96);
  end;