Sumar campos de una consulta?

[danytorres]

Hola a todos los del foro. estoy relizando una consulta que trae los valores de un campo necesito sumar todos esos valores como hago el codigo que utilizo es el siguiente pero me da error.

code:
:________________________
For I := 1 to Datamodule2.TotalesTrakingSalida.RecordCount do
Begin

Datamodule2.TotalesTrakingSalida.IndexFields(i);
AcumPeso := AcumPeso + Datamodule2.TotalesTrakingSalidaTotalPeso.Value;


end;
_________________________