Foros Club Delphi - sumar columna de un dbgrid

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - sumar columna de un dbgrid (https://www.clubdelphi.com/foros/showthread.php?t=8158)

jpcancino

10-03-2004 16:45:17

sumar columna de un dbgrid

como puedo sumar una columna de un dbgrid, es posible.

PD: no quiero usar sql.

jachguate

10-03-2004 16:59:18

Tené en cuenta que no sumas una columna de un dbgrid... sumas una columna en un dataset. Podes hacerlo con algo como:

Código:

Var

  Suma : Double;



Begin

  Suma := 0;

  Tabla.DisableControls;

  Tabla.First;

  while not tabla.eof do

  Begin

    Suma := Suma + TablaCampo.Value;

    Tabla.Next;

  End;

  ShowMessage('la suma es de ' + FloatToStr(suma));

  Tabla.EnableControls;

Hasta luego.

Nuria

10-03-2004 18:16:19

Hola!

Otra opción:

Puedes hacer un Query de la Tabla que tengas relacionado con el DBGrid.

Código:

  Query.Active := False;

  Query.Sql.Text :=  "select sum(NombreCampo) from tabla "

  Query.Active := True;

  ShowMessage('la suma es de ' + Query.FieldByName(NombreCampo).AsString);

Salu2!

Julià T.

11-03-2004 01:53:14

Si además trabajas con un TClientDataset puedes poder un campo agregado, colocar en la expresión de este nuevo campo agregado "sum (campo_x)", poner active a true del campo agregado y el valor del ClientDataset AggregatesActive a true y, ya tienes un campo "suma"

jpcancino

11-03-2004 16:33:37

muchas gracias por su ayuda me srivio bastante
Saludos

La franja horaria es GMT +2. Ahora son las 02:44:04.