制作基于数据库的图表

    lazarus中，可以非常方便地以查询数据为基础生成多种类型的图表。需要的控件：

数据集，如Query1

数据源，如datasource1，它的dataset：Query1

TChart，在其中增加一个图表类型：Chart1BarSeries1，它的source：DbChartSource1

DbChartSource，它的datasource：Datasource1

    打开Query1后，有两个字段：DDID，SUM，用代码设置一下：

  Chart1.BackColor := $61d349;
  DbChartSource1.FieldX := 'DDID';
  DbChartSource1.FieldY := 'SUM';   

生成的图表：

    不太好看，需要后续大量美化才行。