Tendrías que ser algo más explícito, pero deduzco, que tienes una rejilla con un conjunto de datos obtenidos de una consulta y a posteriori, quieres sumar cierto campo, con ó sin condiciones.
Si es eso, no tienes, mas que hacer un bucle y recorrer la rejilla acumlando en una variable y al final del recorrido tendrás el total en dicha variable, no tendrás más que mostrarlo o guardarlo donde desees.
Código Delphi
[-]
Var
nTotal
ouble;
begin
nTotal:=0;
Query1.First;
While not Query1.Eof do
begin
nTotal:=nTotal + Query1Micampo.AsFloat;
Query1.Next;
end;
ShowMessage('El total es: '+FormatFloat(',0.00', ntotal));
Un Saludo.