Qrchart 问题！ 在线等待！

Question

要求
x轴显示 一张表的一个字段（班级名称）
y轴对应统计每个班级的人数
30  |       ___
    |       | |         ___
20  |       | |         | |
    |       | |         | |
10  |       | |         | |          ___
    |       | |         | |          | |
0   |_______| |_________|_|__________| |___________________
            1班         2班          3班

Answer 1

Data Source不会设置  主要是怎么显示 计算出的 班级人数

Answer 2

需要如下数据表格式：[DataSet]
班级名称  班级人数
1班       40
2班       38
3班       42 设置如下：.DataSet:=<DataSet> ;
.Label:=<班级名称 字段名称>;
.X=:=<班级名称 字段名称>;
.Bar:=:=<班级人数 字段名称>;

Answer 3

我有两张表
表1，
student_ID       classID
001               9741
002               9741
003               9742
004               9742
表2
classID           class_Name
9742              9742班
9741              9741班
要求显示如图
30  |       ___
    |       | |         ___
20  |       | |         | |
    |       | |         | |
10  |       | |         | |          ___
    |       | |         | |          | |
0   |_______| |_________|_|__________| |___________________
            1班         2班          3班
请 说 详细一点  谢了

Answer 4

procedure Tdaohuotongzhituxing.Button1Click(Sender: TObject);
begin
tryadoquery1.Close;
adoquery1.Active:=true;
//dbchart1.CopyToClipboardBitmap
dbchart1.Series[0].DataSource := nil;
while not adoquery1.Eof do
begin
   with adoquery2 do
  begin
  close;
  sql.Clear;
  sql.Add('select * from daohuotongzhi  where ('+treeview1.Selected.Text+'=:p1) and (审核=1)');
 adoquery2.Parameters.ParamByName('p1').Value:=adoquery1.fieldbyname(treeview1.Selected.Text).Value;
 open;
 end;
    dbchart1.Series[0].addxy(adoquery1.RecNo,adoquery2.RecordCount,adoquery1.fieldbyname(treeview1.Selected.Text).Value);
    adoquery1.Next;
     end;
except
showmessage('列值信息不足，无法统计！')
end;
end;