Запрос Delphi

[Defender42]

Добрый день.
Мне надо написать запрос по диапазону и вывести все записи попадающие в него. но не могу понять в чем ошибка.
ругается на типы данных

  Query1.SQL.text:='Select * FROM st_olimp WHERE Mes between :Date1 and :Date2';
  Query1.Params.ParamByName('Date1').Value := Datetimepicker1.date ;
  Query1.Params.ParamByName('Date2').Value := Datetimepicker2.date;
     query1.active:=true;

[Аватар]

Mes - видимо номер месяца и тип явно не дата-время. Зачем в условие данные типа TDateTime тулить?

[superedward]

Query1.SQL.text:='Select * FROM st_olimp WHERE Mes between :Date1 and :Date2';
  Query1.Params.ParamByName('Date1').AsDateTime := Datetimepicker1.date ;
  Query1.Params.ParamByName('Date2').AsDateTime := Datetimepicker2.date;