Yo lo habria hecho así:
Código Delphi
[-]
frm_DataModule.qry_Asig_Mat_Materia.Close;
frm_DataModule.qry_Asig_Mat_Materia.SQL.Text('SELECT * FROM MATERIA WHERE NUCLEO_FORMACION='+QuotedStr('TRONCO COMUN')+' OR CLAVE_AA= '+QuotedStr(VarToStr(lucb_AA.KeyValue)));
frm_DataModule.qry_Asig_Mat_Materia.ExecSQL;
frm_DataModule.qry_Asig_Mat_Materia.Open;
o si lo prefieres así:
Código Delphi
[-]
frm_DataModule.qry_Asig_Mat_Materia.Close;
frm_DataModule.qry_Asig_Mat_Materia.SQL.Clear;
frm_DataModule.qry_Asig_Mat_Materia.SQL.Add('SELECT * FROM MATERIA WHERE NUCLEO_FORMACION='+QuotedStr('TRONCO COMUN')+' OR CLAVE_AA= '+QuotedStr(VarToStr(lucb_AA.KeyValue)));
frm_DataModule.qry_Asig_Mat_Materia.ExecSQL;
frm_DataModule.qry_Asig_Mat_Materia.Open;
pero como lo haces tu, a mi parecer, sobra o el add o el text, o pones una o la otra, creo que el SQL.Text no esta haciendo nada, que alguien me corrija si me equivoco