Source position: GIS_Classes.pas line 265
type TPresOnRenderTitle = procedure(
Sender: TObject;
Earth: TCustomEarth;
Geod: TEarthObject;
var bDone: Boolean
) of object;