dbchart使用中的一个小问题(100分)

表结构描述：
基础表：
表结构：
id 自动编号
name 类别名称
price 价格
数据表示例
id name price
1 类别A 20
2 类别B 80
录入数据的数据示例
id type price
0000 类别A 20
0001 类别B 79
0002 类别A 18
0004 类别B 80
price字段的价格可手动输入
现在要统计类别A和类别B的总价各是多少？
如 类别A 38
类别B 159
x轴 类别A 类别B
y轴 38 159
var
mybar:Tbarseries;//柱形图
begin
dbchart.SeriesList.Clear;
mybar:= Tbarseries.Create(self);
mybar.ParentChart:=dbchart;
mybar.DataSource:=table;
//....?
end;

怎么弄啊，给语句，谢谢啦

我觉得应该使用query.
var
mybar : TBarSeries;
//柱形图
begin
adoquery1.close;
adoquery1.sql.text:='select type,sum(price) as sum_price from tablename group by type '
adoquery1.open;

dbchart1.SeriesList.Clear;
mybar:=Tbarseries.Create(self);
mybar.ParentChart:=dbchart1;
mybar.DataSource:=adoquery1;
mybar.XLabelsSource:='type';
mybar.XValues.ValueSource:='type';
mybar.yValues.ValueSource:='sum_price';
end;

mybar.XValues.ValueSource:='type';

type 是字符型的，运行过不去 ？

mybar.XLabelsSource:='x轴对应字段名称';
mybar.XValues.ValueSource:='x轴线对应字段名称';
mybar.yValues.ValueSource:='y轴线对应字段名称';
你自己修改吧

mybar.XValues.ValueSource:='x轴线对应字段名称';

好像不支持字符串型的? 看怎么办?

mybar.Marks.Style:=‘value’;
想设置成value怎么弄呀？

mybar.Marks.Style:=smsValue ;