Исправил , теперь пишет что не возможно открыть фильтр.Но в др Edit открывает, в чем подвох?(
выделяет строку 7)
Код:
procedure TForm2.Edit1Change(Sender: TObject);
begin
if Length(Edit1.Text) > 0 then
begin
ADOQuery1.Filtered:=false;
ADOQuery1.Filter:='[№ i\b] LIKE '+ '''' + Edit1.Text + '%' + '''';
ADOQuery1.Filtered:=true;
end
else ADOQuery1.Filtered:=false;
end;