Source position: graphics.pp line 951
protected procedure TCanvas.FontChanging(
APen: TObject
); virtual;