TSelectorTool.DraggingShape

TSelectorTool.DraggingShape
TSelectorTool

property DraggingShape: TTeeCustomShapePosition;

Unit
TeeSelectorTool

Description
Returns the object that is being currently dragged.

Returns nil if no object is dragged.

The base class TTeeCustomShapePosition is a generic class used to derive chart titles, legend, annotation tools, etc.
You can use the "is" or "=" operators with DraggingShape to determine which part is dragged:

if ChartTool1.DraggingShape = Chart1.Legend then ....