delphi chart 控件曲线显示异常 求赐教

Question

实现代码如下：
for x := 0 to 9 do
         form1.Chart1.SeriesList.Items[0].Addxy(x,strtoint(memo10.Lines[j-10+x]));

Answer 1

你的错误，可能是Y轴的取值区间<800，而你的值>800，造成一段线越值。

Answer 2

每一次曲线开始画前，先把曲线清空。
 form1.Chart1.SeriesList.Items[0].Clear;
for x := 0 to 9 do
         form1.Chart1.SeriesList.Items[0].Addxy(x,strtoint(memo10.Lines[j-10+x]));