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 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;