void __fastcall TForm1::Button1Click(TObject *Sender) 
{ 
    AdsQuery1->Active = false; 
    AdsTable1->Active = true; 
    DataSource1->DataSet = AdsTable1; 
} 
//--------------------------------------------------------------------------- 
void __fastcall TForm1::Button2Click(TObject *Sender) 
{ 

    AdsTable1->Active = false; 
    AdsQuery1->Active = true; 
    DataSource1->DataSet = AdsQuery1; 
}

Две кнопки на форме:
Button1Click — событие первой кнопки
Button2Click — событие второй кнопки
Если после нажатия на вторую кнопку нажать первую вылетает исключение:
"Invalid open mode"

Что нужно закрыть еще в AdsQuery чтобы избежать исключения ?
Спасибо.