![]() |
Может мне кто - то помочь с фильтрацией 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; Но такой текст ругается. Помогите, пожалуйста, сам разобраться не могу, все отправляют на разные ссылки но там толком не чего нет. |
khvalera
Попробуй вместо Цитата:
Код:
Table1.Filter:='[DATA]>='#39+DateToStr(a)+#39+' and [DATA]<='#39+DateToStr(b)+#39; |
Большое спасибо за помощь, теперь не ругается!!!
Может подскажите еще, как сделать чтобы показывало мне с дата (а) по дату (b)? Видать нужно заменить and??? |
khvalera
Ты просто не на всё обратил внимание, я же написал: [DATA] >= [DATA_a] and [DATA] <= [DATA_b]... Т.е. DATA должна быть больше-равна DATA_a и (and) DATA д.б меньше-равна DATA_b. Т.е. именно то, что нужно. |
Большое Сенькью!!!
Все заработало, портил малину thebat, менял буквы и ставил иероглифы. |
Время: 08:45. |
Время: 08:45.
© OSzone.net 2001-