Организация поиска в DBEdit

void __fastcall TForm3:: DBEdit1Change (TObject *Sender)
{
help1:'%'+ Unit1.Form3.DBEdit.Text + '%';
help2:=QuotedStr(help1);
with Unit2.DataModule2.CustomerQuery do
Close;
SQL.Clear;
SQL.Add ('Select * from customer where name like '+help2);
Open;
}

void __fastcall TForm3::DBEdit1Change(TObject *Sender)
{
    DataModule2->CustomerQuery->Close();
    DataModule2->CustomerQuery->SQL->Clear();
    DataModule2->CustomerQuery->SQL->Add(
        String().sprintf(L"Select * from customer where name like '%%%s%%' ", DBEdit1->Text)
    );
    DataModule2->CustomerQuery->Open();
}

Q->Close();
Q->SQL->Clear();
// и так дальше в том же духе

String().sprintf("Select * from customer where name like '%%%s%%' ", DBEdit1->Text)

void __fastcall TForm3::Edit2Change(TObject *Sender)
{
   Q->Active=false;
   Q->SQL->Clear();
   Q->SQL->Add(
 String().sprintf("Select * from customer where name like '%%%s%%' ", Edit1->Text)
 );
   Q->Open();
}

void __fastcall TForm3::Edit2Change(TObject *Sender)
{
   Q->Active=false;
   Q->SQL->Clear();
   Q->SQL->Add(
 String().sprintf("Select * from u4et_raboty where Master like '%%%s%%' ", Edit1->Text)
 );
   Q->Open();
}