procedure TForm1.Chart1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
var r : Real;
begin
R := Chart1.Series[0].XScreenToValue(X);
Chart1.Hint := FloatToStr(R);
end;
Мне кажется, что-то такое нужно было. Просто знать значение координаты Х в месте где стоит мышка ;о)
|