A mi me parece que el error estaría en las conversiones de tipos de datos ocasionados por utilizar:
Código Delphi
[-]
qOperacion.Params[1].value:=dtpFecha.Date;
en lugar de
Código Delphi
[-]
qOperacion.ParamByName('PFecha').AsDateTime:=dtpFecha.DateTime;
pero sin conocer el error, es pura adivinancia la que hace uno
