Filtrando un DBGrid con ADOTable

[eddg]

Señores tengo mi ADOConnection1, ADOTable1, DataSource1, DBGrid1 y un Edit1.

Todo esta conectado a mi base de datos de MS Access...

La tabla tiene mas de 30 campos, pero solo muestro 2 en el DBGrid, entonces, quisiera Filtrar esos DOS Campos.

Uno es de Nombre y el otro es de Formula.

Quisiera tener un filtro tal que si tengo en la lista

maria, pedro, jimena, petra, carlos, dayana, etc...

y si colocara en el EDIT1 "ar", solo me mostrara en el DBGrid a

"maria, carlos". y los demas nombres desaparecieran del DBGrid

apliqué este código que vi en algun post de este foro:
________________________________________________

procedure Tcomponentes.Edit1Change(Sender: TObject);
begin
If (Edit1.text <> '') then
adotable1.Filter:= 'Nombre iupac Like '''+ Edit1.Text + '*''';
end;
_______________________________________________

Sin embargo no me filtra y el DBGrid queda intacto...

Que pueda ser lo q esta mal???