chart mit button-Funktion

[Daniel]

Hallo Hartfrid,

Du bist ganz kurz vor dem Ziel.

Lege die eine Prozedur an, die aufgerufen werden soll, wenn der Anwender auf Deine Serie klickt. Ich nehme mein Mini-Beispiel:

Delphi-Quellcode:

procedure TForm30.Series1Click(Sender: TChartSeries; ValueIndex: Integer;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  ShowMessage( IntToStr(ValueIndex) );
end;

und dann musst Du diese nur noch Deiner Serie zuweisen:

(Chart2.Series[0] as THorizBarSeries).OnClick:= Series1Click; das OnClick-Event sollte schon in das Basis-Klasse vorhanden sein, so dass (vermutlich) auch

Chart2.Series[0].OnClick:= Series1Click; funktionieren wird.