如何动态滴更换DBChart X和Y的Source 它说总是找不到字段，采用ADO数据集的

usese    Series；          
   
 private      
                 MySeries:TBarSeries;      
     public      
     end;      
   
var      
     Form1:    TForm1;      
   
implementation      
   
{$R    *.dfm}      
   
procedure    TForm1.FormCreate(Sender:    TObject);      
begin      
     MySeries:=TBarSeries.Create(Self);      
     MySeries.ParentChart    :=    DBChart1;                                          
end;      
                   //先执行Button1.Click后再执行 Button2.Click;   
procedure    TForm1.suiButton1Click(Sender:    TObject);      
begin         
 With MySeries do                                                                                       
     begin      
             DataSource  :=  ADOTable1;      
             Title  :=  'ProductID';      
             XLabelsSource  :=  'ProductName';      
             YValues.ValueSource  := 'UnitPrice';           
                          //同个数据集切换成 UnitsInst 字段也不行      
             CheckDataSource;      
     end;      
end;      
   
procedure    TForm1.suiButton2Click(Sender:    TObject);      
begin      
     With    MySeries    do      
     begin      
             MySeries.Active:=false;      
             MySeries.Clear;      
             DataSource := ADOTable2;    
                  //切换成不同的数据集的字段说OTable2ProductID找不到      
             Title := 'OrderID';      
             XLabelsSource :=  'OrderID';      
             YValues.ValueSource :=  'SubtoTal';      
             CheckDataSource;      
             MySeries.Active:=True;      
     end;      
end;      
 
两个问题  
1  在同一数据集中为什么有的字段却说找不到呢？明明在DBGride能显示出来而且！  
2  在不同数据集上为什么对X和Y的Source付值了，还是存着上个数据集的Source呢？