на форме DBGrid, Query и DBComboBox

надо отсортировать запись по значению DBComboBox:

if length(DBComboBox1.Text)>0 then
begin
if not Query1.Filtered then Query1.Filtered:=true;
Query1.Filter:='(number='+#39+DBComboBox1.Text+'*'+#39
+') and (doc_date>=' +#39+DateToStr(DateTimePicker1.date) + #39+') and (doc_date<=' +#39+DateTostr(DateTimePicker2.date)+#39+')' ;
end
else
if Query1.Filtered then Query1.Filtered:=false;

не работает

подскажите где ошибка пожалуйста

ну отфильтровать
просто путаю постоянно
но всё равно не работает не хочет он из паруса данные фильтровать, хотя показывает все

Вообщем есть база "Паруса" она на сервере, я могу просмотреть её в DBGridе
но записи не фильтруются (ComboBox.Text). кто может помочь?????????
как это лучше сделать???

я только за !!!!!
но сам не смогу без посказки
Так Сама база Parus.DBC и как всегда там же таблицы .DBF
Я взял нужные мне таблицы, но при изменении текста в DBComboBox изчезают все поля и таблица остаётся пустой что я не делал