Query1.Close;
Query1.SQL.clear;
Query1.SQL.Add('SELECT cobranza.matricula, Cobranza.Nombre,');
Query1.SQL.Add('cobranza.horario, alumnos.nombreprof, Alumnos.UltSem,');
Query1.SQL.Add('sum(Cobranza.Buenopor)as TotalPagado');
Query1.SQL.Add('FROM cobranza, alumnos');
Query1.SQL.Add('where alumnos.matricula=Cobranza.matricula');
Query1.SQL.Add('And alumnos.Ultset = '+QuotedStr(Edit1.Text));
Query1.SQL.Add('Group by cobranza.matricula, cobranza.Nombre,');
Query1.SQL.Add(' cobranza.horario, alumnos.nombreprof, Alumnos.UltSem');
Query1.SQL.Add('Order by alumnos.nombreprof');
Query1.Open;