Source position: controls.pp line 1050
protected procedure TControl.FontChanged(
Sender: TObject
); virtual;