datamodule1.consulta_buscarcurso.Close;
datamodule1.consulta_buscarcurso.Sql.Text:=' SELECT * FROM cursos '+
'where titulo like '''+labelededit1.Text+'*'''' and activo = true '+
'order by anio desc, semestre, titulo';
datamodule1.consulta_buscarcurso.Open;