Scaled = False im Formular setzen.
Besser ist es aber seine Programmierung darauf auszulegen auch unter hochauflösenden Displays (Apple Retina lässt grüßen) eine korrekte Darstellung zu erreichen.
Scaled := False ;
sorgt zwar dafür das die Komponenten nicht skaliert werden (was einem zum Teil ja das ganze Layout zerschlägt, weil Delphi das irgendwie nicht ganz richtig macht),
aber leider sind die Fonts dennoch größer....
d.h.
man muss selbst für ein Skalieren der Controls sorgen. so dass das Layout dabei nicht zermatscht wird.
den faktor mit dem zu skalieren ist ermittelt man mit
Screen.PixelsPerInch/96
Es wäre auch möglich statt die Controls zu skalieren die Font.height mit dem Kehrwert zu skalieren
96/Screen.PixelsPerInch
Aber da im letzten Schritt das Ergebnis immer zu runden ist, ist dieses verfahren das "grob körnigere".