0

指数関数の折れ線グラフを作成しようとしています:

  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;

しかし、セリエ1はグラフに表示されません! 誰かが私を助けることができますか？

4

1 に答える 1

0

下軸の最小値を設定した行を削除します。そして最大。これらの値が間違っている場合に備えて、 i を自動に設定してみてください。

  Chart1.BottomAxis.Automatic:=True;

問題が解決しない場合は、「現状のまま」実行して問題を再現できる簡単なサンプル プロジェクトをお送りください。アップロード ページでファイルを投稿できます。

于 2013-11-12T10:54:14.423 に答える