Source position: controls.pp line 1493
public function TControl.ScaleFontTo96(
const ASize: Integer
):Integer;