我有設定 下列參數了 Chart_Up.MaxPointsPerPage:=30; 換頁指令如下 Chart_Up.NextPage; or Chart_Up.PreviousPage; 還有 哪個地方要設定嗎 ??

Hi seedbcc,    確認一下你點的數量必須大於 Chart_Up.MaxPointsPerPage，否則 Chart_Up.NextPage; or Chart_Up.PreviousPage; 是不會有作用的(因為只有一頁)！     ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

我確定有超過 設定的點數

Hi seedbcc,    剛剛試了一下，作過 Zoom 或 Scroll 後，Chart1.NextPage;Chart1.PreviousPage; 指令即失效， 但在加了 Chart1.UndoZoom; 後即可恢復正常，因此建議跳頁程式修改如下

procedure TForm1.BitBtn2Click(Sender: TObject);
begin
  Chart1.UndoZoom;
  Chart1.PreviousPage;
end;    procedure TForm1.BitBtn3Click(Sender: TObject);
begin
  Chart1.UndoZoom;
  Chart1.NextPage;
end;

你再試試，看是不是這個問題 ---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

還是不行 有夠奇怪的 ??

真得很奇怪 到底是我的屬性哪裡設錯了?? 還是要先drawvalues 才設maxpointperpage屬性 還是scroll不能設 ??

再把問題描述清楚一些 下面三個設定圖，不知道 哪裡設錯了呢 ? 還是下面 畫圖及設定的順序有錯而導致??

    Chart_Up.MaxPointsPerPage:=30;        With Chart_Up.LeftAxis do
    begin
        Automatic :=  False;
        Maximum   :=  Chart_Up.MaxPointsPerPage;
        Minimum   :=  UpMin;
    end;        With Chart_Up.BottomAxis do
    begin
        //  Increment:=;            //ｘ軸的增加數
        Automatic :=  False;
        Maximum   :=  UpXMax-1;
        Minimum   :=  0;
    end;      X_Series.CL  := CL;
  X_Series.LCL := LCL;
  X_Series.UCL := UCL;
  //DrawValues(CtData,X_Series);
  PM.DrawValues(CtData_X,CtData_Y,nil,X_Series,'',False);
  X_Series.ColorEachLine:=False;    

Hi seedbcc,    似乎是 Chart_Up.BottomAxis 的設定問題，既然你已經設定 Automatic 屬性為 false，並指定其最大與最小值，當然會只有一頁而已，換頁指令 Chart_Up.NextPage 與 Chart_Up.PreviousPage 當然會沒有反應

    With Chart_Up.BottomAxis do
    begin
        //  Increment:=;            //ｘ軸的增加數
        Automatic :=  False;
        Maximum   :=  UpXMax-1;
        Minimum   :=  0;
    end;

建議將 Chart_Up.BottomAxis 設為 True 即可

With Chart_Up.BottomAxis do
  Automatic :=  True;

---------------------------------- 小弟才疏學淺，若有謬誤尚請不吝指教 ----------------------------------

------
Fishman

感謝Fishman大大 沒有錯 是 Automatic := True; 的問題 感恩啦