Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Фильтрация по дате [D5, D6, D7, Win2k, WinXP]


faost ©   (2004-07-27 14:43:00) 

Хочу выполнить фильтрацию с помощью следующего кода:

ADOQuery1.Filtered := False;
ADOQuery1.Filter := 'дата >= '''+DateTimePicker1.Text+' 00:00:00'' AND дата <= '''+DateTimePicker1.Text+' 00:00:00''';
ADOQuery1.Filtered := True;


Нужно, чтобы выбирались все записи с даты, выбранной в DateTimePicker1 до даты, выбранной в DateTimePicker2. Вышеприведеный код выбирает записи с даты DateTimePicker1 но не до даты DateTimePicker2 а все, что позже.


Subdigger   (2004-07-27 15:22:00) [1]

ваще как я пишу я пишу так:

 select
   t.mn_dt,
   t.mn_name
 from mn_mn t
where t.mn_dt between :stDt and :EndDt

:stDt, :EndDt - это параметры которые устанавливаются так:

qrDates.parambyname('STDT').asstring:='12.12.2000';
или
qrDates.parambyname('ENDDT').asdatetime:=DateTimePicker1.date;


faost   (2004-07-27 15:14:00) [2]


> Subdigger ©   (27.07.04 15:00) [3]
> попробуй написать в кверике
> where дата betvween DateTimePicker1.Text+' 00:00:00' AND
>  '+DateTimePicker2.Text+' 00:00:00'


Исли так писать, он выдает "Параметр DateTimePicker1.Text" не имеет значения по умолчанию".


Subdigger   (2004-07-27 15:02:00) [3]

ошипка вишла
between


Subdigger   (2004-07-27 15:00:00) [4]

попробуй написать в кверике
where дата betvween DateTimePicker1.Text+' 00:00:00' AND  '+DateTimePicker2.Text+' 00:00:00'


faost   (2004-07-27 14:51:00) [5]


> а в фильтре данных от DateTimePicker2 не наблдается.

Наблюдается, в программе моей там правильно написано...
Вот исправил тут:
ADOQuery1.Filtered := False;
ADOQuery1.Filter := 'дата >= '''+DateTimePicker1.Text+' 00:00:00'' AND дата <= '''+DateTimePicker2.Text+' 00:00:00''';
ADOQuery1.Filtered := True;


Думкин   (2004-07-27 14:45:00) [6]

а в фильтре данных от DateTimePicker2 не наблдается.


Наверх

Титульная страница Поиск, карта сайта Написать письмо