Consulta Desde->Hasta

[RolphyReyes]

Saludos.

Una idea podría ser, pones tu sentencia SELECT dentro del Editor de SQL en tu componente Query así:

Código SQL [-]
Select * From ENTRADAPELOTAS 
Where NUMERO >= COALESCE(NUMERO, NUMERO) 
and   NUMERO <= COALESCE(:HNUMERO, NUMERO)
and   FECHAENTRADA >= COALESCE(FECHA, FECHAENTRADA)
and   FECHAENTRADA <= COALESCE(:HFECHA, FECHAENTRADA)
and   MARCA >= COALESCE(MARCA, MARCA)
and   MARCA <= COALESCE(:HMARCA, MARCA)
ORDER BY NUMERO

Ahí tienes todos tus parámetros, luego en Delphi:

Código Delphi [-]
With QEntradaPelotas, Params do
begin
  Close;
  ParamByName('DNUMERO').Value := Null;
  ParamByName('HNUMERO').Value := Null;
  .
  .
  .
end;

Luego a medida que tienes valores se lo pasas y los que no se
queda nulos y el COALESCE se encarga de dejarlo en blanco.

A recomendación trata de no tener ningún componente desendiente
de TDataSet en la presentación (formularios) trata de ponerlos
en un DataModule.

[[Luis M.]]

Hola RolphyReyes.
Gracias por responder.
Probaré tú código a ver que tal me va.

Empezado por RolphyReyes

A recomendación trata de no tener ningún componente desendiente
de TDataSet en la presentación (formularios) trata de ponerlos
en un DataModule.

Gracias por la recomendación.
Siempre suelo ponerlo en un DataModule, esto ha sido una pequeña excepción.

Nuevamente gracias por tu aporte.
Un saludo.