Hola:
El problema es que estás abriendo primero la consulta y luego estás mandando los parámetros, debe ser al revés
Código Delphi
[-]
if not(qrClientes.Query1.Active) then
begin
qrClientes.Query1.ParamByName('FECHA_INGR').AsDate := dtpInicio.Date;
qrClientes.Query1.ParamByName('FECHA_INGR').AsDate := dtpFin.Date;
qrClientes.Query1.Open;
end;
Espero te sirva
Saludos a todos