DataSet.Sql := 'SELECT * FROM TABLA ' +
'WHERE ID_FABRICANTE = :Fabricante ' +
'AND FECHA BETWEEN esde AND :Hasta';
DataSet.Params[0].Value := edIdFabricante.Text;
DataSet.Params[1].Value := dtpFechaDesde.Date;
DataSet.Params[2].Value := dtpFechaHasta.Date;
DataSet.Open;