Фильтр данных через ComboBox

Table1->Close();
Table1->Filtered = false;
Table1->Filter = "key = " + ComboBox1->Text;
Table1->Filtered = true;
Table1->Open();

void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
 
 
Table1->IndexFieldNames = "Dol";
Table1->SetKey ( ) ;
                       Table1->Close();
 
Table1->Filtered = false;
Table1->Filter = "Dol = " + ComboBox1->Text;
Table1->Filtered = true;
Table1->Open();
}

 Table1->Close();
 Table1->Filtered = false;
 if(DBGrid1->SelectedField->DataType == ftInteger)
   Table1->Filter = DBGrid1->SelectedField->FullName + "=" + Edit1->Text;
 else
   Table1->Filter = DBGrid1->SelectedField->FullName + "='" + Edit1->Text + "'";
 Table1->Filtered = true;
 Table1->Open();

void __fastcall TForm2::Button1Click(TObject *Sender)
{
k=ComboBox1->ItemIndex;
if(k==0)
{
if(Edit1->Text!="")
{
Table1->Filter="Fio="+Edit1->Text;
Table1->Filtered=true;
Edit1->Clear();
}
else Edit1->Text="Задайте значение фильтру!";
Edit1->SetFocus();
}
if(k==1)
{
if(Edit1->Text!="")
{
Table1->Filter="Lic_chet="+Edit1->Text;
Table1->Filtered=true;
Edit1->Clear();
}
else
Edit1->Text="Задайте значение фильтру!";
Edit1->SetFocus();
}
}

AnsiString textEdit=ComboBox1->Text;
    if (ComboBox1->Text != "")
    {
    Form2->ADOTable1->Filtered=false;
    Form2->ADOTable1->Filter="Îáðàçîâàíèå Like %" + ComboBox1->Text + "%";
    //ñîðòèðîâêà
    Form2->ADOTable1->Sort = "Îáðàçîâàíèå DESC";
 
   //êðèòåðèé çàïðîñà ïî íàæàòèþ êíîïêè ÎÊ
    Form2->ADOTable1->Filtered=true;
 
  if (Form2->ADOTable1->RecordCount == 0)
    {
   //êðèòåðèé çàïðîñà ïî íåíàéäåì äàííûì
    Form2->ADOTable1->Filtered=false;
    ShowMessage("Â áàçå íåò íàéäåííûõ ïîëåé óäîâëåòâîðÿþùèõ çàïðîñó");
    }
  else Form8->Close();
   }