Пролемы с фильтрацией

[1234]

procedure TForm15.Edit15Change(Sender: TObject);
begin
 if Length(Edit15.Text)>0 then
DataModule4.ADOtruba.Filtered:=true
else
DataModule4.ADOtruba.Filtered:=false;
DataModule4.ADOtruba.Filter:='Dh>'''+Edit15.Text+'''';
end;

я фильтруюю записи в базе а он их не фильтрует тоесть если я ввожу к слову 95 то он показывает все кроме 95 в чем дело обьясните пожалуйста может я че не так делаю

[Stilet]

то он показывает все кроме 95

Ну у тебя услови е такое Dh>'''+Edit15.Text+'''
Тебе наверное нужно Dh>='''+Edit15.Text+'''
Хотя ту не понятно если числовое поле то ковычки не нужны, а если строковое то > бессмысленен...