[lmikle]

В общем, +1.
Нет двоеточия перед параметром kod в запросе.
А дату в параметр лучше передавать как нативный тип:

Код:

DataModule2.ADOQTovarReport.Parameters.ParamByName('date1').asDateTime:=DateTimePicker1.Date;