Не получается сортировать по дате.

[Volodq]

Добрый день
Имеются следующие компоненты
ADOQuery
DataSource
DBGrid
Button
2 DateTimePicker
Пытаюсь вывести информацию из связанных таблиц отфильтровав её по дате. Компоненты DateTimePicker задают интервал фильтрации.
Записал запрос следующего вида.

begin
   Zhurnal_Query.Close;
   Zhurnal_Query.SQL.Text := 'SELECT I.Famil, I.Imya, I.Otch, N.Kat_Dela,'+
   'N.N_Dela, N.Rol_V_Dele, N.DataVrem_Zased,  N.Kabinet FROM dbo.Nazn_SZ  N,'+
   'dbo.Inf_grahd I WHERE (I.N_Zapisi=N.Grahdanin)and'+
   '(N.DataVrem_zased>'''+DateToStr(DateNach.DateTime)+ ''') and'+
   '(N.DataVrem_zased<'''+DateToStr(DateStop.DateTime)+ ''')';
   Zhurnal_Query.Open;
   
   
  end;

Выделеный кусок должен фильтровать по дате и он фильтрует но только если выбираеш дату меньше 12 го числа если выше 12-го то дает ошибку конвертирования. Возможно нужно как то по другому сделать преобразование типов? А не переходить от формата дата к формату строковому.
Еще я попробовал фильтровать по другому через свойство Filter ADOQuery
Используя следующее.

   Zhurnal_Query.Filtered:=False;
   Zhurnal_Query.Filter:= 'Zhurnal_Query.Fields[6].AsDateTime >'+DateNach.DateTime;
   Zhurnal_Query.Filtered:=True;

Пишет не совместимы типы String и TdateTime
Вот сижу мучаюсь.

[drkred]

смотри есть функция formatdate которая возвращает строку синтаксис: FormatDate('dd.mm.yyyy',DateTime):s tring; вот строка 'dd.mm.yyyy' она задает формат, я не помню в access'e по моему нужно дату записать через / т.е формат 'dd/mm/yyyy', и сам запрос по моему должен так:
select Date
from Table
where (date>#dd.mm.yyyy#)and(Date<#dd.mm. yyyy#)

попробуй со слешами если это не прокатит

[OlegVE]

Здравствуйте
А так не пробовали

begin
   Zhurnal_Query.Close;
   Zhurnal_Query.SQL.Text := 'SELECT I.Famil, I.Imya, I.Otch, N.Kat_Dela,'+
   'N.N_Dela, N.Rol_V_Dele, N.DataVrem_Zased,  N.Kabinet FROM dbo.Nazn_SZ  N,'+
   'dbo.Inf_grahd I WHERE (I.N_Zapisi=N.Grahdanin)and'+
   '(N.DataVrem_zased>#'+DateToStr(DateNach.DateTime)+ #') and'+
   '(N.DataVrem_zased<#'+DateToStr(DateStop.DateTime)+ '#)';
   Zhurnal_Query.Open;
end;

До свидания
Добавка: Пока посылал, уже ответили . В запросах можете использовать и функции самой MS Access, а не только Delphi

[Volodq]

Спасибо но не прокатило. Сделал с решеткой. Пишет синтаксическая ошибка.
А в родном запросе упорно путает день и месяц местами.
И еще я в начале не написал но у меня база не Access а SQL.

[OlegVE]

...путает день и месяц местами...

Используйте тогда функцию FormatDateTime, как Вам предлагалось выше. Там и установите порядок следования дня и месяца.
Извините, исправил на FormatDateTime.

[Аватар]

FormatDateTime('yyyymmdd',DateNach. DateTime) - если ваша SQL это MS SQL, то скушает

[Gulik]

FormatDateTime('mmddyyyy',DateNach.DateTime)

в запросе формат даты должен быть mm.dd.yyyy
плюс ко всему к этому чтобы не было ошибок типо не совпадение типов данных нужно все это дело заключить в #

лично я при построении запросов не пользуюсь функцией FormatDateTime(),
я раскладываю дату по переменным функцией DecodeDate() а потом уже довожу это все до нужного мне вида
метод весьма извращенный, но дело каждого...

[Volodq]

В итоге я сделал вот так и заработало.

Zhurnal_Query.SQL.Text := 'SELECT I.Famil, I.Imya, I.Otch, I.Pol, Z.DataVrem_Vhoda,'+
'Z.DataVrem_Vihoda, Z.N_Kab, Z.Prichina,Z.Primech FROM dbo.Zhurn_posesh Z,'+
'dbo.Inf_grahd I WHERE (Z.Grahdanin=I.N_zapisi) and'+
'(I.Famil= '''+FamilEdit.Text+''')'+
' and Z.DataVrem_Vhoda>= '+
QuotedStr(FormatDateTime('yyyy-mm-dd 00:00:00',DateNach.Date))+
' and Z.DataVrem_Vhoda<= '+
QuotedStr(FormatDateTime('yyyy-mm-dd 23:59:59',DateStop.Date));