Поиск в Dbgrid

[Stranik2007]

Всем привет.
Есть База Данных в MS Acces : Data
Таблица : Clients
Колонки : Фирма авто, Модель авто, Номер авто,
Имя, фамилия клиента...

На форме есть компоненты : ADOConnection1, DataSource1, ADOQuery1, DBGrid1, Edit1, Button1

Подключился к базе данных, на таблице появились данные.

Задача состоит в том чтобы сделать поиск в Dbgrid1, нажав на Button1 в таблице DBGrid1 остались данные которые равны Edit1.text

К примеру если в Edit1.text:='Opel' чтобы остались только данные с фирмой Opel

Зарание СПАСИБО...

[Stilet]

Например

ADOQuery1.Filter:='[Модель авто]='+QuotedStr(Edit1.text);

Или в запрос в WHERE пиши это условие и переоткрывай.