Source position: tadatatools.pas line 25
type TDataPointDistanceToolMeasureEvent = procedure(
ASender: TDataPointDistanceTool
) of object;