[Страдалецъ]

Лучше всего это делать через параметрический запрос:

Код:

AdoQuery1.SQL.Text := 'select * from UserTable where ProductID=:ProductID and SaleDate between :BSale and :ESale';