Código SQL
[-]
select Fecha, Nombre, Efectivo
from Compras
where Fecha>=CURRENT_DATE - :dias
Código:
IbDataset1.close;
IbDataset1.ParamByName('dias').Value := 'los dias que quieras';
IbDataset1.Open;
Creo que es eso lo que quieres, segun he entendido.
Saludos.