cual es la sentencia que estas colocando en el Adoquery?
tiene parametros?
Código Delphi
[-]
Adoquery1.close;
Adoquery1.sql.text:='select * from tbMedicamentos where fechacaducidad < :lafecha + :numerodias';
Adoquery1.params[0] := tudatetimerpicker.date;
Adoquery1.params[1] := strtoint(tuedit.text);
Adoquery1.open;
si adecuas tu sentencia a la que te mostro casimiro en el ejemplo anterior, te deberia funcionar