lazarus中,可以非常方便地以查询数据为基础生成多种类型的图表。需要的控件:
数据集,如Query1
数据源,如datasource1,它的dataset:Query1
TChart,在其中增加一个图表类型:Chart1BarSeries1,它的source:DbChartSource1
DbChartSource,它的datasource:Datasource1
打开Query1后,有两个字段:DDID,SUM,用代码设置一下:
Chart1.BackColor := $61d349;
DbChartSource1.FieldX := 'DDID';
DbChartSource1.FieldY := 'SUM';
生成的图表:
不太好看,需要后续大量美化才行。