Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Базы";
Текущий архив: 2004.06.20;
Скачать: [xml.tar.bz2];

Вниз

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

 
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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.034 c
4-1084351578
Gost1
2004-05-12 12:46
2004.06.20
ImportTable


14-1086336663
Рамиль
2004-06-04 12:11
2004.06.20
Большой трафик ns


4-1084362767
cdsvalik
2004-05-12 15:52
2004.06.20
Как редактировать в Delphi exe файл?


1-1086432205
Narayan
2004-06-05 14:43
2004.06.20
a+b=c


14-1086278692
Drakon
2004-06-03 20:04
2004.06.20
Вклады в проект A-pay





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский