Source position: kcontrols.pas line 1333
procedure DPIScaleControl(
Control: TControl;
FromDPI: Integer = 96
);