d Delphi Tchart 控件使用!(转帖) 收藏
这样就会生成一个简单的折线图表,要生成其它类型的数据图表,可以添加不同的数据序列(各种图表的序列类型可以参考帮助文档)。
2.如何设置图表的标题?
TChart组件提供了Title属性可以这是图表的标题,包括标题的内容、字体、对齐方式等都可以通过Title属性设置。
最简单的设置方式:
Chart1.Title.Text.Text := '图表的标题';
3.如何修改图表的背景颜和整个图表的颜?
TChart是一个窗体控件,可以通过修改Color属性设置图表颜,这是一种最简单的方式:
Chart1.Color := clWhite;
修改图表部分的背景可以通过BackColor属性来实现:
Chart1.BackColor := clGreen;
此外,TChart还提供了渐变的背景支持,通过Gradient控制:
Chart1.Gradient.Visible := True;
2.如何设置图表的标题?
TChart组件提供了Title属性可以这是图表的标题,包括标题的内容、字体、对齐方式等都可以通过Title属性设置。
最简单的设置方式:
Chart1.Title.Text.Text := '图表的标题';
3.如何修改图表的背景颜和整个图表的颜?
TChart是一个窗体控件,可以通过修改Color属性设置图表颜,这是一种最简单的方式:
Chart1.Color := clWhite;
修改图表部分的背景可以通过BackColor属性来实现:
Chart1.BackColor := clGreen;
此外,TChart还提供了渐变的背景支持,通过Gradient控制:
Chart1.Gradient.Visible := True;
Chart1.Gradient.Direction := gdFromTopLeft;
Chart1.Gradient.StartColor := clGreen;
Chart1.Gradient.EndColor := clYellow;
4.TChart的3D效果如何控制?
TChart提供了View3D属性,控制是否使用3D效果,View3dWalls属性控制是否显示左侧的3D墙效果
5.如何不显示图表控件生成图表?
很遗憾,TChart是一个Windows窗体控件,必须依附一个窗体或Windows控件才能使用。如果要不显示TChart的话,可以将TChart的Visible属性设为False来使用。下面的例子创建了一个隐藏的TChart来生成图表:
var
Chart: TChart;
S: TChartSeries;
TmpFile: string;
begin
Chart1.Gradient.StartColor := clGreen;
Chart1.Gradient.EndColor := clYellow;
4.TChart的3D效果如何控制?
TChart提供了View3D属性,控制是否使用3D效果,View3dWalls属性控制是否显示左侧的3D墙效果
5.如何不显示图表控件生成图表?
很遗憾,TChart是一个Windows窗体控件,必须依附一个窗体或Windows控件才能使用。如果要不显示TChart的话,可以将TChart的Visible属性设为False来使用。下面的例子创建了一个隐藏的TChart来生成图表:
var
Chart: TChart;
S: TChartSeries;
TmpFile: string;
begin
Chart := TChart.Create(nil);
try
Chart.Parent := Application.MainForm;
Chart.Visible := False;
Chart.Title.Text.Text := '测试图表';
S := TBarSeries.Create(Chart);
Chart.AddSeries(S);
S.Title := '嘿嘿';
S.AddXY(1, 56, '一月', clGreen);
S.AddXY(2, 67, '二月', clYellow);
S.AddXY(3, 34, '三月', clBlue);
S.AddXY(4, 78, '四月', clRed);
Chart.View3D := False;
Chart.BackColor := clWhite;
teechart控件安装 Chart.Gradient.StartColor := clWhite;
try
Chart.Parent := Application.MainForm;
Chart.Visible := False;
Chart.Title.Text.Text := '测试图表';
S := TBarSeries.Create(Chart);
Chart.AddSeries(S);
S.Title := '嘿嘿';
S.AddXY(1, 56, '一月', clGreen);
S.AddXY(2, 67, '二月', clYellow);
S.AddXY(3, 34, '三月', clBlue);
S.AddXY(4, 78, '四月', clRed);
Chart.View3D := False;
Chart.BackColor := clWhite;
teechart控件安装 Chart.Gradient.StartColor := clWhite;
Chart.Gradient.EndColor := clWhite;
Chart.Gradient.Visible := True;
TmpFile := Application.ExeName + '.bmp';
Chart.SaveToBitmapFile(TmpFile);
Image1.Picture.LoadFromFile(TmpFile);
finally
Chart.Free;
end;
end;
Chart.Gradient.Visible := True;
TmpFile := Application.ExeName + '.bmp';
Chart.SaveToBitmapFile(TmpFile);
Image1.Picture.LoadFromFile(TmpFile);
finally
Chart.Free;
end;
end;
分析报告1.1 [概述] TChart是delphi里面一个标准的图形显示控件。它可以静态设计(at design time)也可以动态生成。
1.2 [继承关系] Tobject
TPersistent
TComponent
TControl
TCustomControl
TWedgetControl
TChart
TCustomPanel
1.3 [tips]1.3.1 Pro Version支持Bezier , Contour , Radar 和 point3D 曲线1.3.2 支持jpeg文件的导出1.3.3 Chart中的Series 可以连接到Table , Query , RemoteDataset(其他数据集)1.3.4 TChart里的series的active属性可以实现对已绘制图形的显示或者隐藏1.3.5 在TChart中, tchartSeries是所有具体series的父类,没有画出什么来的,用一个具体的series类来创建就可以了,比如用TLineSeries、 TPieSeries、 TPointSeries、 TPointSeries等等都行1.3.6 TTeeFunction Component可以实现在同一个TChart里面,一个Serries对另一个Serries的统计
1.4 [问题极其使用技巧]1.4.1 TChart中如何实现只有Y轴的放大与缩小功能?设置BottomAxis或者LeftAxis的Automatic:=false并同时设置Minimum,Maximum属性
1.4.2 如何固定TChart中的坐标,不使TChart中的坐标跟随Series的变化而变化?//设置底座标
版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198,我们将在24小时内删除。
发表评论