菜鸟问题：chart或者DBchart的饼图或者柱状图里面的DateSource面板上的属性在程序里面怎么设置？

Question

诸位大虾，chart或者DBchart的饼图或者柱状图里面的DateSource面板上的属性在程序里面怎么设置？比如饼图的labels和pie,柱状图的labels、X、Bar。
通过程序代码设置这些属性怎么写？希望大虾多多赐教。谢了先！

Answer 1

procedure TF_B_HGrs.B_PictureClick(Sender: TObject);
begin
StatusBar1.Panels[0].Text:='现在为真实数据!';
   B_TJData1;
   series1.Clear;
   Series1.add(sfyl,'人数',clNavy);
end;
procedure TF_B_HGrs.B_TJData1;
var sqlstr:string;
begin
with query1 do
begin
        Close;
    sqlstr:='select count(*) as rs from CB_RY where sfyl=:isfyl';
    //UnPrepare;
    SQL.Clear;
    SQL.Add(sqlstr);
    unprepare;
    parambyname('isfyl').asstring:='是';
    Prepare;
    Open;
    sfyl:=query1['rs'];
end;
end;看不懂在问我！
最好先给分了！

Answer 2

Series1.DataSource := Table1;
Series1.XValues.DateTime := True;
Series1.XLabelsSource := '...';
Series1.YValues.ValueSource := '...';
Series1.CheckDataSource;

Answer 3

dbchart1.SeriesList[0].DataSources

Answer 4

同意失眠夜的
另外补充以下 Series1.DataSource := query1