Delphi и БД

[Danko]

Здравствуйте, товарищи программисты. Программка, созданная в Delphi, соединяется с базой данных, созданной в Access, с помощью технологии ADO. Таблица отображается в DBgrid. Есть несколько radiogroup, в которых выбирается значение того или иного поля таблицы, а так же, есть edit, в поле которого вводится требуемое условие для поиска по определенному полю таблицы. Т.е., есть БД, в которой содержится различные вакансии. В radiogroup мы можем выбрать, например, образование работника (среднее, высшее) и при вводе в edit требуемую профессию, в таблице должны отразиться лишь те варианты, которые удовлетворяют не только заданной профессии, но и образованию (указанному в радиогруппе). Проблема в том, что у меня не получается это реализовать. По отдельности все работает, а вместе - нет. Вот часть кода, отвечающая за поиск:

if (radiogroup2.ItemIndex= 2) then
educt:='Среднее';
ADOQUery1.Active:=false;
ADOQUery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM adbook WHERE (prof LIKE "'+edit1.Text+'%") and '+
'(educ LIKE "'+educt+'%")');
ADOQUery1.Active:=true;

Какие есть варианты для решение данной проблемы?

P.S. Возможно, есть способы, позволяющие постепенно обновлять таблицу? Т.е., сделав один запрос, следующий запрос выполнялся бы в той таблице, которая сформировалась при первом запросе?

[Stilet]

Не работает скорее всего из-за "

ADOQuery1.SQL.Add('SELECT * FROM adbook WHERE (prof LIKE '+QuitedStr(edit1.Text+'%')+') and '+
'(educ LIKE '+QuotedStr(educt+'%')+')');

[netpolice]

А чем Вам, фильтры ненравятся?
ADOQuery1.Filter

Да и я бы сначала запрос какой нить переменной присвоил, а потом в add подставлял,

S:='SELECT * FROM adbook WHERE (prof LIKE '+QuitedStr(edit1.Text+'%')+') and '+'(educ LIKE '+QuotedStr(educt+'%')+')';

ADOQuery1.SQL.Add(S);

Быстрее ошибки выявятся, заодно и посмотреть можно какой фактически запрос передается.

[Danko]

Спасибо за ответы!
Stilet, к сожалению Ваш вариант у меня не сработал.
netpolice, действительно, про фильтры я как то не подумал
В итоге реализовал я задуманное с помощью фильтров, но возникла другая проблема.
В программе имеется кнопка, которая обновляет таблицу, со следующим кодом:

ADOQUery1.Active:=false;
ADOQUery1.SQL.Clear;
ADOQuery1.SQL.Add('SELECT * FROM adbook');
ADOQUery1.Active:=true;

Раньше код отлично справлялся со своей задачей, но после применения фильтрации возвращаются уже отфильтрованные данные, а не исходные. Не могу понять в чем причина Возможно, кто-то знает решение данной проблемы?

[Serge_Bliznykov]

допишите в этот код выключение фильтрации:

ADOQUery1.Active:=false;
ADOQUery1.Filtered:=false;
ADOQUery1.Filter := '';
ADOQUery1.SQL.Text :=  'SELECT * FROM adbook';
ADOQUery1.Active:=true;