problema tdbgrid

[chele]

Yo ahora cuando cambio de columna hago unos calculos y le meti esto :

Código Delphi [-]
      while not qryautorizaciones.Eof do
      begin
      sumaimporte := sumaimporte + qryautorizacionesAutdto.value;
      sumaimporte1 := sumaimporte1 + qryautorizacionesDescMan.value;
      qryautorizaciones.next;
      end;

sumatotal := sumaimporte + sumaimporte1;


if (sumatotal - qryautorizacionesImporte1.value) > 0 then
raise exception.create('La cantidad autorizada supera la pendiente');

pero se me vuelve todo loco, esto es lo que quiero que haga pero se me vuelve loco el dbgrid