estas haciendo un mal filtrado, o lo dejas con el between o con el rango, no los juntes. si quieres con el rango puedes hacer esto:
Código Delphi
[-]QRVentasPorFecha.Qusuarios.SQL.Add('select * from tabla1 WHERE fecha >=:Fecha1 AND Fecha <=:Fecha2');