Teechart图表应用技术详解—第三章之点击事件

Steema公司和慧都科技针对中国市场联合推出中文版TeeChart for .NET图表控件，一共汉化2000个词条（17000个单词），汉化文档35000个单词，包括控件设计时与运行时的界面汉化以及控件使用向导文档的汉化，总汉化90%以上！TeeChart for .NET中文版让您在使用和学习上没有任何语言障碍，至少可以节省30%的开发时间。TeeChart for .NET中文版具有易上手，使用方便，稳定性好，性价比高，价格优惠等优势，并且针对Web应用提供无限制服务器分发授权方式，非常有利于产品集成。

---

在图表的序列上单击( Chart On click Series）

图表的OnClickSeries事件允许访问任一个被激活的序列。选择窗体中的图表组件Chart，打开对象观察窗口Object Inspector，选择单击事件OnClickSeries，双击OnclickSeries后加入下面的代码：

procedure TForm1 DBChart1ClickSeries(Sender: TCustomChart;
  Series: TChartSeries;ValueIndex: Integer; Button: TMouseButton;
  Shift: TShiftState; X,Y: Integer);
begin
    ShowMessage('单击序列：'+ Series. Name+'在点：'+ inttostr( valueindex);
end;

valueindex是序列数据点的索引，利用它可以访问Ⅹ、Y的值，例如：

begin
    ShowMessage('单击序列：'+ Series.Name+·在点t :'+ Floattostr( Series.
    XValue [valueindex])+','+Floattostr(Series. YValue valueindex]);
end;

在图表上单击( ChartOnClick）

在图表上单击可以得到同样的信息：

procedure TForm1 DBChart1Click(Sender: TObject);
var t, tmp:Integer;
              x,y: Double;
begin
    Series1. GetCursorValues(x, y);
    for t: =0 to DBChart1. SeriesCount-l do
    begin
        tmp: =DBChart1 Series[t]. GetCursorValueIndex;
        if tmp<>-1 then
          ShowMessage('单击序列：'+ DBChart1.Series[t].Name+'在点'：+ IntTrostr(tmp);
   end;
end;

在序列上单击和双击( Series OnClick and OnDblClick）

序列的Onclick事件是在序列级水平上捕捉的事件，该事件可以直接指定被访问的序列。要访问该事件，必须在对象观察窗口Object Inpsector选择指定序列，然后在Event选项卡找到OnClick事件加入下列代码：

procedure TForm1.Series1Click(Sender: TChartSeries; ValueIndex: Integer;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
   ShowMessage('您好:'+ Sender.Name+'在点:'+ IntToStr( valueindex);
end;

---

下一节我们将会介绍第四章TeeChart的工具组件：工具组件概述。如果有对Teechart图表感兴趣的朋友，可以多多关注本教程，并且欢迎在评论区留言。