Ошибка несоответствия типов данных в выражении условия отбора
В Ассess поле 'RDate' имеет тип дата/время
Код:
1 2 3 4 5 6 7 8 9 10 | procedure TForm3 . Button2Click(Sender: TObject);
var startdate,finishdate:TDateTime;
begin
startdate:=DateTimePicker1 . Date;
finishdate:=DateTimePicker2 . Date;
dm . ADOQuery6 . Active:= false ;
dm . ADOQuery6 . SQL . Text:= 'select * from table1 where rdate between "' +DateToStr(startdate)+ '" and "' +DateToStr(finishdate)+ '"' ;
dm . ADOQuery6 . ExecSQL;
dm . ADOQuery6 . Active:= true ;
end ;
|
Выбирал 'краткий формат даты' типа dd.mm.yyyy ....Не помогло
Подскажите, в чём проблема?