Auf die Schnelle konnte ich jetzt nicht entdecken, wo Delphi das, beim Laden, umschreibt.
Bis auf die Stelle, wo Form.Font.Height angepasst wird.
Zitat:
Delphi-Quellcode:
procedure TCustomForm.ReadState(...
...
if (sfFont in ScalingFlags) and (FPixelsPerInch <> Screen.PixelsPerInch) then
Font.Height := MulDiv(Font.Height, Screen.PixelsPerInch, FPixelsPerInch);
Es wird ja nicht nur Left, Top, Width und Height angepasst, sondern auch die Margins, Font.Size, Constraints, BorderWidth usw.
PS: Du mußt es wohl nur machen, wenn Form.Scaled=True ist.