tchart横坐标时间轴,该怎么解决

2012-02-29

tchart横坐标时间轴用tchart画图，横轴用来显示时间，从0到15min,增量为15秒，相当于要画60个点，可是这60个点

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

Delphi(Pascal) code

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

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

Delphi(Pascal) code

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;
[解决办法]
设置横轴为时间类型：series1.XValues.DateTime := True;

热点排行

.NET

tchart横坐标时间轴,该怎么解决