Fórum Como somar os valoresa de uma coluna de uma IBTable #52220

faça assim...

Var X: Real;
begin
x := 0;
DM.venda_Det.first;
while not DM.venda.eof do
begin
X := X + DM.venda_DetValorTotal.value;
DM.venda_Det.next;
end;
DM.venda.edit;
DM.vendaTotalGeral.value := (x);
DM.venda.post;
end;

vc pode fazer assim como sugerido pelo colega [b:cfdd35f469]Alexandre_Torres[/b:cfdd35f469] usando [color=darkblue:cfdd35f469][b:cfdd35f469]while [/b:cfdd35f469]... [/color:cfdd35f469][color=darkblue:cfdd35f469][b:cfdd35f469]do[/b:cfdd35f469][/color:cfdd35f469] ou então ir incrementando uma variável a cada inserção de ítem, assim vc teria sempre o valor atualizado sem precisar varrer a tabela, lembre-se q mesmo q vc prefira varrer a tabela com [b:cfdd35f469]while do[/b:cfdd35f469] defina bem suas condições, pq se vc tiver muitos registros em sua base, ja imagina q vai demorar um pouco isso sem levar em consideração o poder da máquina do seu cliente.

Boa sorte!!