TChart是动态创建的,想交X轴为时间,Y为数值
for i:=1 to 4 do
begin
  line[i]:=Tlineseries.Create(Self);
  Chart[i]:=TChart.Create(application);
  Chart[i].Parent:=gbChart;
  CHart[i].Left:=((i+1) mod 2)* 400+20;
  chart[i].Top :=(((i+1) div 2)-1)*250+20;
  line[i].ParentChart :=chart[i];
  line[i].XValues.DateTime :=true;
  chart[i].BottomAxis.DateTimeFormat :='hh:mm:ss' ;
  chart[i].BottomAxis.Increment := DateTimeStep[ dtOneMinute ] ;
  chart[i].View3D :=false;
  chart[i].BevelInner :=bvLowered;
  chart[i].BevelOuter :=bvLowered;
  chart[i].Color :=clLime;
  chart[i].Legend.Visible :=false;
  chart[i].AddSeries(line[i]);
   //用于自动//////////
  chart[i].LeftAxis.Automatic :=true;
  chart[i].LeftAxis.AutomaticMaximum:=true;
  chart[i].LeftAxis.AutomaticMinimum:=true;
/////////////
  chart[i].foot.Text.Add('时:分:秒');但使用
chart[i].Series[0].AddXY(strtotime('17:22:23'),2345,'17:22:23',clred);
出错
使用
chart[i].Series[0].AddXY(strtotime('17:22:23'),345,'17:22:23',clred);
可以添加节点
我估计可以是Y轴区间限制
所以将
  chart[i].LeftAxis.Automatic :=true;
  chart[i].LeftAxis.AutomaticMaximum:=true;
  chart[i].LeftAxis.AutomaticMinimum:=true;
改为chart[i].LeftAxis.SetMinMax(0,3000);
结果chart[i].Series[0].AddXY(strtotime('17:22:23'),2345,'17:22:23',clred);可以添加
但我有不想指定区间 有可以自动适应Y指的吗,应如何写