Source position: tatools.pas line 516
type TChartToolHintPositionEvent = procedure(
ATool: TDataPointHintTool;
var APoint: TPoint
) of object;