Código Delphi [-] Query1.Sql.Close; // He tenido que cambiar por Query1.Close;Query1.Sql.Clear;Query1.Sql.Add('Select * from MiTabla');Query1.Sql.Add('Where Fecha between :F1 And :F2');Query1.ParamByName('F1').AsDate:=dIni;Query1.ParamByName('F2').AsDate:=dFin; Query1.Open;
Query1.Sql.Close; // He tenido que cambiar por Query1.Close;Query1.Sql.Clear;Query1.Sql.Add('Select * from MiTabla');Query1.Sql.Add('Where Fecha between :F1 And :F2');Query1.ParamByName('F1').AsDate:=dIni;Query1.ParamByName('F2').AsDate:=dFin; Query1.Open;