用TChart控件的问题

Question

在控件中点击鼠标后，如何获得该点对应的纵坐标和横坐标
譬如：我的横坐标为月，纵坐标为金额
点击鼠标后对应的获得（3月，103元）

Answer 1

同意4搂这位兄弟的意见，delphi安装目录demo下有个teechar目录，里面有个ucross的单元文件是关于这方面的，以前用过，不过忘了，你可以看看。

Answer 2

我碰见了，试了一下，可以实现。如下：
procedure TMainForm.Chart1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
Var tmpX,tmpY:Double;
begin
  { check if mouse is inside Chart rectangle }
  if PtInRect( Chart1.ChartRect, Point(X-Chart1.Width3D,Y+Chart1.Height3D)  ) then
  begin
    With Series1 do
    begin
      GetCursorValues(tmpX,tmpY);  { <-- get values under mouse cursor }
      Label2.Caption:=GetVertAxis.LabelValue(tmpY)+
                      ' '+
                      GetHorizAxis.LabelValue(tmpX);
    end;
  end;
end;
其中使用的几个函数是delphi自带的，没有源码。