Source position: kmemo.pas line 1079
public function TKMemoImageBlock.CalcAscent(
ACanvas: TCanvas
):Integer; override;