关于"TChart"控件的使用问题，在线给分...

Question

我想用程序自动增加如图所示的“Series”

Answer 1

chart1.AddSeries(TLineSeries.Create(Chart1));  //动态创建线行Series ，其他类似

Answer 2

with   TLineSeries.Create(self)   do 
       begin 
           ParentChart:=   Chart1; 
           XValues.DateTime:=   True; 
           Pointer.Visible:=   True; 
           Pointer.HorizSize:=2; 
           Pointer.VertSize:=2; 
           Pointer.Style:=   psCircle; 
           Pointer.InflateMargins:=   True; 
           Pointer.Brush.Color:=   clWhite; 
           Pointer.Brush.Style:=   bsSolid; 
           SeriesColor:=clRed; 
           AddXY(0,0, 'Label ',clBlack); 
           Title:=   'Title '; 
       end;