Привет.
Подскажите в чем дело? Почему не выполнется SQL-запрос?

procedure TForm1.Button1Click(Sender: TObject);
begin
DataSource1.DataSet:= ADOQuery1;
With ADOQuery1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT *');
SQL.Add('FROM Хабаровск');
SQL.Add('WHERE  month  BETWEEN  "'+DateEdit1.EditText+'" AND "'+DateEdit1.EditText+'"');
Open;
end;
end;
 --------> Выдает ошибку: НЕСООТВЕТСТВИЕ ТИПОВ ДАННЫХ В ВЫРАЖЕНИИ УСЛОВИЯ ЗАПРОСА
 

Если убрать кавычки  "дата" , то

procedure TForm1.Button1Click(Sender: TObject);
begin
DataSource1.DataSet:= ADOQuery1;
With ADOQuery1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT *');
SQL.Add('FROM Хабаровск');
SQL.Add('WHERE  month  BETWEEN  '+DateEdit1.EditText+' AND '+DateEdit1.EditText+'');
Open;
end;
end;

 -------> В этом случае выдается др. ошибка: ЧИСЛО СОДЕРЖИТ СИНТАКСИЧЕСКУЮ ОШИБКУ
 
Пробовал вместо DateEdit1.EditText вставлять конкретные даты:
SQL.Add('WHERE  month  BETWEEN  "01.04.2003" AND "30.07.2003"');
Опять выдается ошибка как в первом случае!!!
Таблица Хабаровск храниться в Access, полю month присвоен краткий формат даты.
Заранее спосибо.

Большое спасибо Cat2
Так все работает:
procedure TForm1.Button1Click(Sender: TObject);
begin
DataSource1.DataSet:= ADOQuery1;
With ADOQuery1 do begin
Close;
SQL.Clear;
SQL.Add('SELECT *');
SQL.Add('FROM Хабаровск');
SQL.Add('WHERE  [month]  BETWEEN  DateValue("'+DateEdit1.EditText+'") AND DateValue("'+DateEdit2.EditText+'")');
Open;
end;
end;