Koordinaten herausfinden wenn auf TChart geklickt wird

[Viktorii]

Hallo,

ich möchte gerne die geklickten Koordinaten herausbekommen, wenn ich in ein TChart klicke. Und zwar die Koordinaten bezogen auf das dargestellte Koordinatensystem.

Ich habe es so versucht:

Delphi-Quellcode:

procedure TMainForm.ChartBlauClick(Sender: TObject);
var
  test: TPoint;
begin
  test := ChartBlau.GetCursorPos;
  sleep(10); 
end;

Allerdings werden da nur die Koordinaten bezogen auf die Komponente selbst zurückgegeben.

Biete TChart für mein Problem eine Lösung und wenn ja, wie muss ich vorgehen?

Vielen Dank.

[Sven M.]

Willst du denn im Endeffekt die Werte der Achsen an der aktuellen Cursorposition auslesen? Dann gibt's von TChart die Funktion GetCursorValues...;)

[Viktorii]

Zitat:

Zitat von Sven M.

Willst du denn im Endeffekt die Werte der Achsen an der aktuellen Cursorposition auslesen? Dann gibt's von TChart die Funktion GetCursorValues...;)

Ja das ist genau das was ich möchte. Habe es jetzt so gemacht:

Delphi-Quellcode:

procedure TMainForm.ChartBlauClick(Sender: TObject);
var
  x: Extended;
  y: Extended;
begin
  ChartBlau.Series[1].GetCursorValues(x,y);
end;

Allerdings kommt bei mit dann der Fehler:

Zitat:

[DCC Fehler] MainForm.pas(280): E2033 Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen

Verstehe aber nicht warum :(

[Sven M.]

Warum hast du denn zu der Series einen Index angegeben? Versuch's mal so...

Delphi-Quellcode:

procedure TMainForm.ChartBlauClick(Sender: TObject); 
var 
  x: Double; 
  y: Double; 
begin 
  Series1.GetCursorValues(x,y); 
end;