tendrias que sacar el valor del combo del armado de la Query
Código:
modulo.qryPreferencias.Close;
modulo.qryPreferencias.sql.Text:= 'select e.cod_Empresa, t.cod_Empresa, t.Tipo_Practica
from empresa as e, practica as t
where e.cod_Empresa = t.cod_Empresa
and t.Tipo_Practica = ' + Form_Preferencias.ComboBox_Tipo.Text;
modulo.qryPreferencias.Open;
Suerte