TTChartOnDragPointToolEndDrag
type TTChartOnDragPointToolEndDrag = procedure(ASender: TObject; Index: Integer; start: WordBool) of object; Type Library TeeChartx