Фильтр ADOQuery+ComboBox+Edit

[vsa_210465]

Доброго времени суток. Столкнулся со следующим вопросом. Delphi7,Access. На форме есть ADOQuery, Edit,Label. Делаю фильтрацию:

 procedure TForm1.Label1Click(Sender:TObject);
 begin
 //выборка по городу
   Query1.Active:=false;
   Query1.SQL.Clear;
   Query1.SQL.Add('SELECT *');
   Query1.SQL.Add('FROM Contragents');
   Query1.SQL.Add('WHERE Gorod LIKE '''+Edit1.Text+'''');
   Query1.Active:=true;
end;

Все ОК.
Появилась необходимость добавления ComboBox, чтобы внести в него кроме города еще менеджера и т.п. и уже производить фильтрацию по другим критериям.

 procedure TForm1.Label1Click(Sender:TObject);
 begin
 //выборка по городу
   Query1.Active:=false;
   Query1.SQL.Clear;
   Query1.SQL.Add('SELECT *');
   Query1.SQL.Add('FROM Contragents');
   Query1.SQL.Add('WHERE ''+ComboBox1.Text+'' LIKE '''+Edit1.Text+'''');
   Query1.Active:=true;
end;

Вот тут и начались проблемы,ничего не могу сделать.
Подскажите,пожалуйста, в чем я ошибся? Спасибо

[quit]

Query1.SQL.Add('WHERE '+ComboBox1.Text+' LIKE '+QuotedStr(Edit1.Text));

[vsa_210465]

quid, супер!!! Большущее спасибо,работает!!!
А подскажите,пожалуйста, это при ситуации, когда в ComboBoxе занесены не Lookup поля. А как быть, когда занесены Lookup?
Спасибо

[pobedin]

dbLookupComboBox1.text либо dbLookupComboBox1.KeyValue