tchart横坐标时间轴

[gxx521]

用tchart画图，横轴用来显示时间，从0到15min,增量为15秒，相当于要画60个点，可是这60个点来的时间间隔不一定相等，请问series1.add()或series1.addxy();方法中如何写呢,下面是我写的一段代码，请问该如何写，才能显示一条完整的曲线
谢谢了，我很急啊，马上就要交了，我是delphi菜鸟

procedure TForm2.Button1Click(Sender: TObject);
var
data:array[0..59] of integer;
i:integer;
begin
  for i := 0 to 59 do
    data[i]:=random(200);
while i<60 do
begin
  Series1.AddXY();//里面不知道该如何写
  
  i:=i+1;
end;

end;

[zhaixing0101]

设置横轴为时间类型：series1.XValues.DateTime := True;

[bdmh]

AddXY,参数就是x,y的值呀,你传入点的实际值就行了,x应该是你的i,y应该是你的data[i]

[kampan]

procedure TForm1.Button1Click(Sender: TObject);
var
  Series: TLineSeries;
  I: Integer;
  tmpValue: Integer;
begin
  Series := TLineSeries.Create(Chart1);

  Chart1.Title.Text.Text := '图表的标题';
  randomize;
  for I := 1 to 60 do
  begin
    tmpValue := random(200);
    Series.Add(tmpValue, IntToStr(I), clRed);
  end;
  Chart1.AddSeries(Series);

  Chart1.Color := clWhite;
  Chart1.BackColor := clMoneyGreen;
  Chart1.LeftAxis.Title.Caption := '（单位：有功需量-0.0001kW; 无功需量-0.0001kvar）';

  Chart1.AddSeries(Series);
end;

[gxx521]

[Quote=引用 2 楼 kampan 的回复:]
Delphi(Pascal) codeprocedure TForm1.Button1Click(Sender: TObject);var
Series: TLineSeries;
I: Integer;
tmpValue: Integer;begin
Series := TLineSeries.Create(Chart1);

Chart1.Title.Text.Text :¡­
[/Quote]
你好，我的横轴是时间，如果是数字的话，这种办法可能行，可是时间就不一定了，我的点来的时间间隔可能不同，可能10秒来一个，也可能12秒来一个，13秒来一个，这该如何写呢