概述:主要说明在delphi中TeeChart的各种属性,以及提供一个TeeChart的使用实例。
TeeChart控件介绍
TeeChart
TeeChart使用目的
如果你需要在程序中制作曲线图、条状图、饼状图等等,使用这个控件都将是你的明智选择。它因为是已经被封装好的产品,所以使用方便,可控性强,不过有的时候会有点小BUG。最好能找到源码,并自己打几个补丁。
TeeChart配置说明
Chart Series(序列)
Add…
Fast
Line(TLineSeries
Bar(TBarSeries竖条状图)、
Horiz.
Area(TAreaSeries
Point(TPointSeries
Pie(TPieSeries
Shape(TChartShape
Gantt(TGanttSeries
Arrow(TArrowSeries
Bubble(TBubbleSeries
Series Format:修改序列的格式
Series Point:修改序列中点的样子
Series General:对序列的配置,包括Axis,Legend,Formats,Cursor。
Series Marks:是否显示序列中每个点的值。
Series Data
Title…
Change…
Chart General:一些基本的参数设置。
Print
Export…:输出
Margins:页边空白
Allow
Animated
Allow
Chart Axis
Show
Chart Axis Scales:调整坐标轴的比例
Automatic:可以自动处理最大与最小值,也可以手工设置。
Change…:可以自动处理增量,也可以手工设置。
Logarithmic:对数的
Inverted:反向的
Chart Axis Title:设置坐标轴的标题
Title:标题
Angle:标题的角度
Size:标题的宽度
Font…:标题的字体
Chart Axis Labels:设置坐标轴的标签
Titles
Chart Legend(图例):图表中的一个长方形的用来显示图例标注的区域。可以标注Series的名称或者Series中的项目和数值。
Visible
Back
Font
Frame
Position
Margin
Legend
Text
Resize
Inverted
%Top
%Color
Dividing
Shadow
Chart Panel
Bevel
Bevel
Back
Style:(Stretch伸展,
Inside:只显示在背后壁上
Panel
Border:给控件加边界
Gradient(梯度):梯度显示颜色
Visible、Start
Direction(方向):上下、左右、从中间
Chart Paging
Points
Scale
Chart Walls(壁)
Left
Bottom
Back
Pattern…(模式):=(Solid实心,None无,Horizontal竖条纹,Vertical横条纹,
Diagonal对角线,Back.Diagonal反向对角线,Cross十字线,DiagonalCross对角十字线);
Border…(边线):=(Solid实线,
Dash
Transparent
Chart 3D
3Dimensions(维):是否3维显示
Orthogonal(直角的):3维显示为直角显示,则Elevation,Rotaion,Perspective被屏蔽
ZoomText:坐标数字与图形一起缩放
Zoom:图形的缩放
Rotaion(旋转):关闭Orthogonal后,可以在Y轴上旋转
Elevation(正视图)
Horiz.
Vert.
Perspective(透视)
TeeChart使用实例:
// AddPages
NewTabSheet := TTabSheet.Create(pgMain);
with NewTabSheet do
begin
Parent := pgMain;
PageControl := pgMain;
Tag := Ord(CountTypeIndex);
Caption := arrCountType[CountTypeIndex];
end;
// AddCharts
NewChart := TChart.Create(NewTabSheet);
with NewChart do
begin
Parent := NewTabSheet;
Title.Text.Add('网间结算' + arrCountType[CountTypeIndex] + '/天分布图');
LeftAxis.Title.Caption := arrCountType[CountTypeIndex];
BottomAxis.Title.Caption := '话单日期';
Legend.Visible := sbLegend.Down;
Legend.Alignment := laBottom;
Legend.LegendStyle := lsSeries;
View3D := sb3D.Down;
Width := NewTabSheet.Width;
Height := NewTabSheet.Height;
end;
// ClearSeries
AChart.Series[SeriesIndex].Free;
// AddSeries
NewSeries := TLineSeries.Create(AChart);
NewSeries.Title := ANameList.Strings[SeriesIndex];
NewSeries.Marks.Visible :=True;
AChart.AddSeries(NewSeries);
// AddNameForSeries
AChart.SeriesList[SeriesIndex].Title:= NewName;
// ShowSeries
AChart.Series[SeriesIndex].Active := True;
// EmptySeries
AChart.Series[SeriesIndex].Clear;
// FillSeries
AChart.Series[SeriesIndex].AddXY();