Source position: tatools.pas line 513
type TChartToolHintEvent = procedure(
ATool: TDataPointHintTool;
const APoint: TPoint;
var AHint: string
) of object;