如上圖，所示 如何讓上下二圖的點 能夠對齊呢? 我有在程式中加下列的code

procedure TFrm_Chart.Ct_UpGetAxisLabel(Sender: TChartAxis;
  Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
  var i:integer;
begin
  If Sender = TChart(TChartAxis(Sender).ParentChart).LeftAxis then
  begin
      Sender.AxisValuesFormat := Copy('#,##0.0000##',1,10);
      try
        LabelText := Copy(FormatFloat('#,##0.0000##',StrToFloat(LabelText)),1,10);
      except
      end;
  end;
end;    procedure TFrm_Chart.Down_UpGetAxisLabel(Sender: TChartAxis;
  Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
  var i:integer;
begin
  If Sender = TChart(TChartAxis(Sender).ParentChart).LeftAxis then
  begin
      Sender.AxisValuesFormat := Copy('#,##0.0000##',1,11);
      try
        LabelText := Copy(FormatFloat('#,##0.0000##',StrToFloat(LabelText)),1,11);
      except
      end;
  end;
end;

Hi seedbcc ,    將兩個 Chart 的 LeftAxis Label 長度設為一樣應該就可以了！

procedure TFrm_Chart.Ct_UpGetAxisLabel(Sender: TChartAxis;
  Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
  var i:integer;
begin
  If Sender = TChart(TChartAxis(Sender).ParentChart).LeftAxis then
  begin
      Sender.AxisValuesFormat := Copy('#,##0.0000##',1,10);
      try
        LabelText := ' '   Copy(FormatFloat('#,##0.0000##',StrToFloat(LabelText)),1,10);
      except
      end;
  end;
end;

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

------
Fishman

很明顯的，上下兩張圖根本無法對齊 就算 將兩個 Chart 的 LeftAxis Label 長度設為一樣應該就可以了！ 也一樣 答案也很簡單 你兩張圖的起點，根本就沒有對齊，那一樣的變量，不同的起點，怎麼可能對齊 先將兩個 Chart 對齊吧