می تونی بنویسی

AdoTable1.filter:='Name='+ quotedStr(Edit1.Text);
if AdoTable1.RecordCount<1 Then
AdoTable1.filter:='Name Like '+ quotedStr(Edit1.Text+'%');

یه چیزی شبیه به این