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