[[ElDioni]]

Creo que lo que te falta es:

Código Delphi [-]
frm_DataModule.qry_Asig_Mat_Materia.ExecSql;

antes del

Código Delphi [-]
frm_DataModule.qry_Asig_Mat_Materia.Open;