[mrgorr]

Добрый день, прошу помощи
Delphi 7 + Acces
Период по дате от и до с условием не пойму в чем дело

Код:

DataModule2.ADOQTovarReport.sql.Clear;
DataModule2.ADOQTovarReport.sql.text:='select * from Zakazano where (КодТовара =kod) and (Дата between :Date1  AND :date2)';
DataModule2.ADOQTovarReport.Parameters.ParamByName('kod').Value:=StrToFloat(DBEdit1.text);
DataModule2.ADOQTovarReport.Parameters.ParamByName('date1').Value:=datetostr(DateTimePicker1.Date);
DataModule2.ADOQTovarReport.Parameters.ParamByName('date2').Value:=datetostr(DateTimePicker2.Date);
DataModule2.ADOQTovarReport.Active:= true;

Админ: Пользуемся тегами для оформления кода!

Если разбить запрос на два по отдельности все работает, но вместе говорит что параметр kod не найден