Filter

[khvalera]

Может мне кто - то помочь с фильтрацией Delphi по дате с таблицей Парадокса?
Такой текст работает нормально:
procedure TForm1.DateTimePicker2Change(Sender: TObject);
var a,: Tdate;
begin
a:=DateTimePicker2.Date;
Table1.Filter:='[DATA]='#39+DateToStr(a)+#39;
Table1.Filtered:=True;
end

А как сделать, чтобы фильтрация происходила, начиная с даты (а) по (b)
типа :
Table1.Filter:='[DATA]='#39+DateToStr(a)+#39 and '[DATA]='#39+DateToStr(b)+#39;
Но такой текст ругается.
Помогите, пожалуйста, сам разобраться не могу, все отправляют на разные ссылки
но там толком не чего нет.

[shurikan]

khvalera
Попробуй вместо
Table1.Filter:='[DATA]='#39+DateToStr(a)+#39 and '[DATA]='#39+DateToStr(b)+#39; написать так

Table1.Filter:='[DATA]>='#39+DateToStr(a)+#39+' and [DATA]<='#39+DateToStr(b)+#39;

[khvalera]

Большое спасибо за помощь, теперь не ругается!!!
Может подскажите еще, как сделать чтобы показывало мне  
с дата (а) по дату (b)?
Видать нужно заменить and???

[shurikan]

khvalera
Ты просто не на всё обратил внимание, я же написал:
[DATA] >= [DATA_a] and [DATA] <= [DATA_b]...
Т.е. DATA должна быть больше-равна DATA_a и (and) DATA д.б меньше-равна DATA_b. Т.е. именно то, что нужно.

[khvalera]

Большое Сенькью!!!
Все заработало, портил малину thebat, менял буквы и ставил иероглифы.