dbchart如何用程序控制？

Question

由于表示动态取到的，所以  dbchart中的表及字段是动态设置的，我是这样作的，但是没有显示：
    ........
    ADOTable1.active:= true;  
    with dbchart1.Series[0] do
      begin
        TabOrder:= 0;
        DataSource:= DataSource1;  //datasource1是连ADOTable1的
        XValues.Name := 'X' ;
        XValues.Order := loAscending ;
        YValues.DateTime := False ;
        YValues.Name := 'Y';
        YValues.Order := loNone ;
        YValues.ValueSource := ADOTable1.Fields[0].FieldName;
         
      end;
 不知哪里还要写个函数，请高手帮忙！