Hi WIng2005,
dies sollte über den Event GantSeries.OnMouseDown und den Zugriff über die Properties YValues möglich sein,
die du beispielsweise über die die Methode AddGanttColor setzt, da der YValue meist nicht verwendet wird.
Delphi-Quellcode:
...
for i := 0 to Werte.Count-1 do
<GanttSeries>.AddGanttColor(<FromDate>, <ToDate>, [b]<Y-Wert>[/b], 'Mein Gant', clNavy);
...
Delphi-Quellcode:
...GantChartMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
var
ClickedGant : Longint;
begin
if Assigned(<GanttSeries>) then begin
ClickedGant := FGanttSeries.Clicked(x, y);
if (ClickedGant <> -1) then begin
<GanttSeries>.[b]YValues[/b][ClickedGant]));
end;
end;
end;