不管是db chart 或是 非db chart 內的series 畫點的時候 都會由第一點開始畫 ，也就是從x軸的0開始畫 而Tvec 也是由 a[0] ，index為0 開始 我要如何 由1 塞起 ，而且0 不去 畫呢?

Hello seedbcc,    不曉得是不是你要的. 試試看用Series1->AddNull() ex:

Series1->AddNull("0");
Series1->Add(5,"1",clRed);
Series1->Add(10,"2",clRed);

PS.請轉成Delphi.

感謝你的回答 不過這不是我要的

X軸的數值沒有指定，又或者呼叫的函式處理畫點時就是從0開始。 看提供的函式有沒有可以多設定起始點從1開始。 或者可以設定Series.XLables[I]:='1'。

可以設定Series.XLables[I]:='1'。 這一句不太懂！ 對啦！再問一下 我可否 將ｘ軸原本顯示的代號 假若 原本 為 0 1 2 3 4 5 程式執行時，將它 置換為 1 2 3 4 5 6 這樣就可以解決 我的問題

可以設定Series.XLables[I]:='1'。 這一句不太懂！ 對啦！再問一下 我可否 將ｘ軸原本顯示的代號 假若 原本 為 0 1 2 3 4 5 程式執行時，將它 置換為 1 2 3 4 5 6 這樣就可以解決 我的問題

可以設定Series.XLables[I]:='1'。 這一句不太懂！ 對啦！再問一下 我可否 將ｘ軸原本顯示的代號 假若 原本 為 0 1 2 3 4 5 程式執行時，將它 置換為 1 2 3 4 5 6 這樣就可以解決 我的問題

可以設定Series.XLables[I]:='1'。 這一句不太懂！ 對啦！再問一下 我可否 將ｘ軸原本顯示的代號 假若 原本 為 0 1 2 3 4 5 程式執行時，將它 置換為 1 2 3 4 5 6 這樣就可以解決 我的問題

Sorry 網路太慢了 讓我以為沒有寫進去 結果一直點，就多post 好幾篇

TeeChart在加點時會幫你增加XLabels， 又或者在加點時直接設定Label也可。    所以如果呼叫別人寫好畫點函式發現XLabel不是自己想要時再去跑 迴圈設定XLabel[I]。    

Function TChartSeries.AddXY( Const AXValue,AYValue:Double;
                             Const ALabel:String; AColor:TColor):Integer;
var t : Integer;
Begin
   //省略        if (ALabel<>'') or (FLabels.Count>0) then { speed opt. 5.02 }
       Labels.InsertLabel(result,ALabel);        //省略
end;

越看越不懂了

Hi seedbcc,    試試以下程式碼，加入該 TChart 的 OnGetAxisLabel 事件，看能不能符合你的需要

procedure TForm1.Chart1GetAxisLabel(Sender: TChartAxis;
  Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
Var
  I : Integer;
begin
  IF Sender = TChart(TChartAxis(Sender).ParentChart).BottomAxis then
    begin
      IF TryStrToInt(LabelText,I) then
        LabelText := IntTostr(I   1);
    end;
end;

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

------
Fishman