TChart - Gantt bei Onclick Y-Wert ermitteln

[WIng2005]

Habs gefunden, das XLabel wars....:

Delphi-Quellcode:

procedure TMainForm.Ch_Ent_PV1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

var
  ClickedGant : Longint;

begin
  if Assigned(Series7) then begin
    ClickedGant := Series7.Clicked(x, y);
    if (ClickedGant <> -1) then
      ShowMessage('Label: '+Series7.XLabel[ClickedGant]);
  end;


end;

Vielen Dank für deine Ansätze...
MFG
Steffen