Sumar campos
¿Cómo puedo recorrer un campo especifico y recorrer todas sus filas hacia abajo para obtener sus valores y sumarlos, usando el componente query y dejar el resultado en un memo?
Muchas gracias
Muchas gracias
1 Respuesta
Respuesta de miguecrack
1
Se puede hacer de la siguiente forma:
var
suma:Float; (o lo que sea)
suma:=0;
Tabla.First;
while not Tabla.EOF do
begin suma:=suma+Tabla.FieldByName['EL CAMPO A SUMAR'].Value;
Tabla.next;
end;
memo.Text:=FloatToStr(suma);
var
suma:Float; (o lo que sea)
suma:=0;
Tabla.First;
while not Tabla.EOF do
begin suma:=suma+Tabla.FieldByName['EL CAMPO A SUMAR'].Value;
Tabla.next;
end;
memo.Text:=FloatToStr(suma);
