delphi中的dbchart中的饼形图怎么是一条直线

dbchart中的饼形图。无法显示。下面是代码。
      with adoquery2 do
      begin
        close;
        sql.clear;
        sql.add('select commonname,sum(val(DMAF)) as i  from 日粮修改表  where formula = '''+trim(combobox11.text)+''' group by commonname');
        open;
      end;
      dbchart2.Series[0].XLabelssource:='commonname';
      dbchart2.series[0].YValues.valuesource:='i';
      dbchart2.series[0].DataSource:=adoquery2;


上面的代码有问题吗？为什么不显示成饼而是一条直线。愁死我了。希望高人指点。

---

    series1.Active:=false; 
        series1.DataSource:=query1;

这两句就错了，你自己去改吧

---

我以前的：

      Query1.Close; 
      Query1.SQL.Clear; 
      Query1.SQL.Add('select  sum(Tm)  as  nfield,Cjx  from  aaa  group  by  Cjx'); 
      Query1.Open; 
      series1.Active:=false; 
      series1.DataSource:=query1; 
      series1.xL