SQL entre fechas

query1.Close;
query1.SQL.clear;

dato:='SELECT * from venta where fecha between :f1 and :f2';
query1.SQL.add(dato);

query1.ParamByName('f1').DataType:=ftdate;
query1.ParamByName('f1').Value:=strtodate('11/04/2007');
query1.ParamByName('f2').DataType:=ftdate;
query1.ParamByName('f2').Value:=strtodate('15/04/2007');


query1.Active:=true;