Hallo René,
ich weiss zwar nicht, welche Tchart-Version du hast, aber es sollte so gehn:
Delphi-Quellcode:
procedure TForm1.Chart1MouseMove(Sender: TObject; Shift: TShiftState;
X, Y: Integer);
Var
i:Integer;
begin
chart1.ShowHint:=True;
For i:=0 To Chart1.SeriesCount-1 do
If Chart1.Series[i].GetCursorValueIndex >0 Then
Chart1.Hint:=(Chart1.Series[i].ValueMarkText[Chart1.Series[i].GetCursorValueIndex]);
end;
mfg
BrunoT