delphi-2010 - 函数指数图

Question

我正在尝试创建指数函数的折线图：

  j:=IWcmbxCriterionName.ItemIndex;

     p1a:=(-5000)*0.001;
     p1c:= -(Exp(P1a * Min[j])) /  (Exp(P1a * Max[j]) - Exp(P1a * Min[j]));
     p1b := (1 - P1c) / Exp(P1a * Max[j]);
     k1 := Max[j];
     i1 := Min[j];
     while i1 <= k1 do
       begin
         Serie1.AddXY(i1, P1b * Exp(p1a * (i1)) + p1c,'',clWebBLUE);  
         i1 := i1 + 0.01;
       end;
     chart1.BottomAxis.Maximum:=k1;
     chart1.BottomAxis.Minimum:= min[j];
     chart1.UndoZoom;

但是 serie1 没有出现在图表上！有人可以帮助我吗？

Answer 1

删除您设置底轴最小值的线。和最大。并尝试将 i 设置为自动以防万一这些值错误：

  Chart1.BottomAxis.Automatic:=True;

如果问题仍然存在，请向我们发送一个简单的示例项目，我们可以“按原样”运行以在此处重现问题。您可以在我们的上传页面发布您的文件。