Solo tiene un pequeño detalle:
Código Delphi
[-]
query1.Close;
query1.SQL.Clear;
query1.SQL.Add('delete from mat_estudiantes where matricula ='+ quotedStr(matricula.Text) +
' and ciclo=' );query1.ExecSql;
Código Delphi
[-]
query1.Close;
query1.SQL.Clear;
query1.SQL.Add('update mat_estudiantes set inscrito=' +QuotedStr(si.Caption)+
' where matricula ='+#39);query1.ExecSql;