如何画曲线。急等(50分)

我用一个数组array[0..3000]来记录一个装置的运行行程,每一秒记录一个数据，我该如何在接受数据的过程中将接受数据的速度也用另一条曲线表示出来。
假设我现在已经成功接受了3000个数。如何将这3000的速度用曲线画出来，用程序来实现
for j:=1 to 3000 do
begin
series1.AddXY(j,TempList[j+1]-TempList[j)),'',clBlack);
end;

你好.我也在南京.有时间大家认识一下吗???你们是不是做GPS的呀.
我的QQ 5269564.
电话:025-5821586-824.韦一笑.

//绘曲线CurvePoints是坐标数组
数组array[0..3000]
for j:=0 to 3000-1 do
begin
CurvePoints[j].X=j;
CurvePoints[j].Y=TempList[j+1]-TempList[j];
series1.AddXY(j,TempList[j+1]-TempList[j)),'',clBlack);
end;

mCanvas.Polyline(CurvePoints);

谢谢各位，我现在已经从事系统分析方面的工作，以后估计自己写程序的机会不是很多，不过还是很高兴认识你，有空联系，