TCustomChart.CalcClickedPart

TCustomChart.CalcClickedPart
TCustomChart

procedure CalcClickedPart(Pos: TPoint; Var Part: TChartClickedPart);

Unit
Chart

Description
Use this method to return information about the TeeChart component below the Mouse pointer at an X,Y location.

Example :

The following code sets the cursor to 'Hand' when over a TeeChart Title component.

procedure TTitleClickEvent.Chart1MouseMove(Sender: TObject;
Shift: TShiftState; X, Y: Integer);
var
P : TChartClickedPart;
begin
Chart1.CalcClickedPart(Point(x,y), P);

Case P.Part of
cpTitle,cpFoot,
cpSubTitle,cpSubFoot: Chart1.Cursor:=crHandPoint;
else
Chart1.Cursor:=crDefault;
end;

Chart1.OriginalCursor:=Chart1.Cursor;
end;