Soma

Delphi

03/02/2003

Alguem por favor sabe como posso somar todos os valores de um determinado campo em uma tabela paradox sem que seja por sql?


Anonymous

Anonymous

Curtidas 0

Respostas

Roberto

Roberto

03/02/2003

Olá Elilton. Tudo bem !?

Vamos fazer o seguinte:

Digamos que vc tenha um campo do tipo Inteiro em sua tabela que vc queira somar:

Faça o seguinte no evento que vc queira disparar a soma:

var Soma: Integer;
begin
Soma:= 0;
Tabela.First;
while not(Tabela.Eof) do
begin
if not(Tabela.FieldByName(´CAMPO´).IsNull) then
Soma:= Soma + Tabela.FieldByName(´CAMPO´).AsInteger;
Tabela.Next;
end;
end;

Vc poderia por exemplo, substituir a variável soma por um campo calculado...

Espero ter ajudado.

[]´s
Roberto.


GOSTEI 0
POSTAR