بازیابی رکوردهای بین دو تاریخ

[mojtaba_dehghan]

سلام دوستان
من یه جدول در بانک اطلاعاتی paradox7 ساختم که یکی از فیلدهاش از نوع date هست.
کدهای زیر رو برای بازیابی اطلاعات از اون جدول نوشتم.برنامه اجرا میشه و هنگام زدن کلید f9 مشکلی پیش نمیاد ولی وقتی دکمه "مشاهده گزارش" رو میزنم با این پیغام خطا مواجه میشم:
project project1.exception raised... 'invalid use of keyword'. token:date
خواهش میکنم کمکم کنید که چه کار باید بکنم.این هم کدهایی که نوشتم:


day1:=StrToInt(Edit3.Text);
month1:=StrToInt(Edit1.Text);
year1:=StrToInt(Edit2.Text);
date1:=StrToDate(IntToStr(day1)+'/'+IntToStr(month1)+'/'+IntToStr(year1));
str_date1:=DateToStr(date1);
Label16.Caption:=str_date1;
day2:=StrToInt(Edit4.Text);
month2:=StrToInt(Edit7.Text);
year2:=StrToInt(Edit8.Text);
date2:=StrToDate(IntToStr(day2)+'/'+IntToStr(month2)+'/'+IntToStr(year2));
str_date2:=DateToStr(date2);
Label17.Caption:=str_date2;
form1.Query4.SQL.Clear;
form1.Query4.SQL.Add('select * from mojudi where anbarname='+QuotedStr(ComboBox1.Text)+'and date between'+QuotedStr(Label16.Caption)+'and'+QuotedSt r(Label17.Caption)+'and khoruj =0');
form1.Query4.Active:=true;
QuickReport7.PreviewModal;
form25.Close;