Delphi之Tchart控件使用心得.docVIP

Delphi之Tchart控件使用心得 最近在学习delphi，做一个软件练手，用到Tchart控件，有些粗略的使用心得，供delphi初学者参考。 TChart是delphi里面一个标准的图形显示控件。它可以静态设计（at design time）也可以动态生成。可下载Steema TeeChart 7，没有源代码，能用就好！ 由于我要在同一个Chart界面显示不同的图形，需要动态编程实时绘制曲线。 一、添加Series之前，要删除已有的Series，只能从后往前删，否则出错：? for i: Chart1.SeriesCount-1 downto 0??do begin Chart1.Series[i].Free; ??end; 二、运行时候创建一个Series, 有多种方法。 1．Var MySeries : TBarSeries ; MySeries : TBarSeries.Create Self ; MySeries.ParentChart : Chart1 ; 2．Chart1.AddSeries TBarSeries.Create Self ; 3．Var MyClass : TChartSeriesClass; MyClass : TBarSeries ; Chart1.AddSeries MyClass.Create Self ; 在这里根据，用到循环结构动态添加多条Series。 ??for j: 0 to??NXUGMU-1 do begin series: TFastLineSeries.Create Chart1 ; Chart1.AddSeries Series ; //动态增加series series.LinePen.Width: 2; //设定线宽 Chart1.Series[j].Title: 速度 +StrVelocity[j];??//动态标题 randomize; end; 三、在chart中画出的曲线某个点上标记出该点的值 series.Marks.Visible: True; Series.Marks.Style: smsValue; 四、固定TChart中的坐标，不使TChart中的坐标跟随Series的变化而变化 //设置底座标 ??with Chart1.BottomAxis do ??begin Automatic: false; Minimum: 0; LabelStyle : talText; ??end; 五、添加坐标值，自动绘制曲线 Chart1.Series[j].AddXY Xzhi,Yzhi,Label,color ;?