Delphi中怎样把Tchart的X坐标自定义为时间坐标

Question

怎样把下列各点的连线显示在Tchart中？X轴是时间类型，Y轴为整型
 （2009-4-12 0：00：02 ，50）
 （2009-4-12 0：00：02 ，80）
 （2009-4-12 1：10：02 ，30）
 （2009-4-12 1：10：02 ，60）
 （2009-4-12 0：30：10 ，45）
 （2009-4-12 0：30：10 ，65）
 （2009-4-12 2：00：00 ，30） 
 （2009-4-12 2：00：00 ，25） 

Answer 1

uses Series;var
  SS: TStringList;procedure TForm1.Button1Click(Sender: TObject);
var
  Srs3: TLineSeries;
  I: Integer;
begin
  Srs3:= TLineSeries.Create(Self.Chart1);
  for I := 0 to SS.Count-1 do
    Srs3.Add(StrtoFloat(SS.Values[SS.Names[I]]),SS.Names[I],clRed);
  Self.Chart1.AddSeries(Srs3);
end;procedure TForm1.FormCreate(Sender: TObject);
begin
  SS := TStringList.Create;
  SS.Add('2009-4-12 0:00:02=50');
  SS.Add('2009-4-12 0:00:02=80');
  SS.Add('2009-4-12 1:10:02=30');
  SS.Add('2009-4-12 1:10:02=60');
  SS.Add('2009-4-12 0:30:10=45');
  SS.Add('2009-4-12 0:30:10=65');
  SS.Add('2009-4-12 2:00:00=30');
  SS.Add('2009-4-12 2:00:00=25');
end;procedure TForm1.FormDestroy(Sender: TObject);
begin
  SS.Free;
end;

Answer 2

但是如果用MoveTo（）和Lineto（）实现画线，怎么写代码？