如圖所示，有二個series 對應各別的y軸 x軸 TChart的MouseMove事件中，如何判斷滑鼠所到之處是哪個Series?

procedure TFrm_Chart.ChartMouseMove(Sender: TObject;
  Shift: TShiftState; X, Y: Integer);
begin
  ???
end;

这个控件用的比较少，不过看了一下觉得应该在

Chart1ClickSeries(Sender: TCustomChart;
  Series: TChartSeries; ValueIndex: Integer; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);

事件下写，这个事件中你可以直接得到所点击的Series： Series: TChartSeries

我是要滑鼠在圖中遊走 但並未對圖做click的動作 所以您的解答 可能不符合 還是感謝你的回答

沒用過 TChart 在 News 中有這麼一篇裡面有稍微提示到: http://groups.google.com.tw/groups?hl=zh-TW&lr=&rls=GGLD,GGLD:2005-04,GGLD:zh-TW&th=58f4ff450a5786&rnum=1    --

Hi seedbcc,    

procedure TForm1.Chart1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
var
    I : Integer;
    AValueIndex : Integer;
    TmpSeies : TChartSeries;
begin
  for I := 0 to TChart(Sender).SeriesList.Count - 1 do
    begin
      TmpSeies := TChart(Sender).SeriesList.Series[I];
      AValueIndex := TmpSeies.GetCursorValueIndex;
      if AValueIndex > -1 then
        begin
          Edit1.Text := TChart(Sender).SeriesList.Series[I].Name;
          Exit;
        end
      else
        Edit1.Text := '';
    end;
end;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman