Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.06.20;
Скачать: CL | DM;

Вниз

Помогите пожалуйста! Фильтр по дате!   Найти похожие ветки 

 
nedefan   (2004-05-26 17:52) [0]

Имею таблицу надо что -бы при нажатии кнопки программа выводила только записи попадающие в диапазон заданных дат. Даты берутся с компонента DateTimePicker Я сделал так:
Table1.Filter :="(dateprod_tov >=" + DateToStr(DateTimePicker1.Date) + ") and  (dateprod_tov <="+ DateToStr(DateTimePicker2.Date) + ")";
Table1.Filtered:=True;

Но он выдает следующую ошибку:
"Invalid filter rexpression character:".".
Заранее спасибо


 
Sandman25+1   (2004-05-26 17:53) [1]

QuotedStr(DateToStr(DateTimePicker1.Date))


 
Anatoly Podgoretsky ©   (2004-05-26 17:56) [2]

Без кавычек только числа можно в фильтре указывать


 
CrazyMan ©   (2004-05-26 18:08) [3]

Обычно я в фильтре даты указываю в фигурных скобках все проходит на ура! :
filter := "(my_dat={"01.01.2004"})"


 
nedefan   (2004-05-26 20:01) [4]

Спасибо всем кто ответил но яперепробовал (по моему) все возможные комбинации НИЧЕГО НЕ ПОЛУЧАЕТСЯ
Пожалуйста кто знает напишите!


 
Vlad ©   (2004-05-26 20:26) [5]


> nedefan   (26.05.04 20:01) [4]

Пользуйся событием OnFilterRecord и не мучайся.


 
Anatoly Podgoretsky ©   (2004-05-26 20:49) [6]

nedefan   (26.05.04 20:01) [4]
Не может быть, совет [1] рабочий


 
Viktor   (2004-05-27 00:49) [7]

> Vlad ©   (26.05.04 20:26) [5]
>
> > nedefan   (26.05.04 20:01) [4]
>
> Пользуйся событием OnFilterRecord и не мучайся.


procedure TfNaklPrListForm.tNaklPrihFilterRecord(DataSet: TDataSet;
 var Accept: Boolean);
begin
Accept:=(tNaklPrihDATE_PR.Value>=DateTimePicker1.Date-1) AND
       (tNaklPrihDATE_PR.Value<=DateTimePicker2.Date)
end;



Страницы: 1 вся ветка

Текущий архив: 2004.06.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.022 c
3-1085668722
zdn
2004-05-27 18:38
2004.06.20
Как в FireBIrd добавить?


14-1085903308
KilkennyCat
2004-05-30 11:48
2004.06.20
Компонент MS Word


14-1086421412
тихий вовочка
2004-06-05 11:43
2004.06.20
Новая супер почта


1-1086676624
Timon
2004-06-08 10:37
2004.06.20
ExcelApplication1.Workbooks[0].SaveAs ОШИБКА


14-1086407858
Думкин
2004-06-05 07:57
2004.06.20
С днем рождения! 5 июня