to jilonger:一定要看！(20分)

jilonger:你在问题“关于teechart的难题！解决的人绝对是高手”中的回答不见了！（你可以）
看看这个问题）麻烦你在给我一份好么？先谢谢了

不知你作什么的，是股票呀、工控。。。，先告诉我，我就发送。哈哈...

我要作统计图

我昨天的DEMO已经DEL了。我没有找到，我又写一个。
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, TeEngine, Series, OHLChart, CandleCh, ExtCtrls, TeeProcs, Chart;

type
TForm1 = class(TForm)
Chart1: TChart;
Series1: TCandleSeries;
procedure FormCreate(Sender: TObject);
procedure Series1Click(Sender: TChartSeries; ValueIndex: Integer;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
Series1.FillSampleValues(100);
end;

procedure TForm1.Series1Click(Sender: TChartSeries; ValueIndex: Integer;
Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
case ValueIndex of
0..99: Showmessage(Format('ValueIndex=%d, XValue=%f,Yvalue=%f', [Valueindex,
TCandleSeries(Sender).XValues[ValueIndex],
TCandleSeries(Sender).YValues[ValueIndex]]));
end;
end;

end.

谢谢大侠，我是个新手，希望大侠以后多多帮忙

接受答案了.