当用图表显示数据时,一般用柱状图来显示
代码如下
procedure TForm1.Button1Click(Sender: TObject);
var
barser:tbarSeries;
begin
barser:=tbarseries.Create(nil);
barser.ParentChart:=self.DBChart1;
barser.DataSource:=self.Table1;
barser.YValues.ValueSource:='size';
barser.XLabelsSource:='name';
end;
这里用的是 animals 数据库