Fórum Soma de valores #175426
16/08/2003
0
Olá...
Gostaria de saber se é possivel fazer o cálculo de um campo de uma tabela filtrada, por exemplo para se obter o valor total do campo Valor Total ( que aparece em um dbgrid, como se faz com o QRExpression no Quick Report) - somando todos os valores deste campo.
Obrigado......
Cleverson
Gostaria de saber se é possivel fazer o cálculo de um campo de uma tabela filtrada, por exemplo para se obter o valor total do campo Valor Total ( que aparece em um dbgrid, como se faz com o QRExpression no Quick Report) - somando todos os valores deste campo.
Obrigado......
Cleverson
Cleverson_rutes
Curtir tópico
+ 0
Responder
Posts
16/08/2003
Joilson_gouveia
Use uma função que retorne o valor da soma, cfe. o exemplo abaixo:
function retornaSoma:Float;
var
Soma:Double;
begin
Soma := 0;
query1.DisableControls;
query1.First;
while not query1.Eof do
begin
if not query1.FieldByName(´Valor´).IsNull then
Soma := Soma + query1.FieldByName(´Valor´).AsFloat;
query1.Next;
end;
Result := Soma;
end;
Se usar table, faça as adaptações pertinentes...
end;
function retornaSoma:Float;
var
Soma:Double;
begin
Soma := 0;
query1.DisableControls;
query1.First;
while not query1.Eof do
begin
if not query1.FieldByName(´Valor´).IsNull then
Soma := Soma + query1.FieldByName(´Valor´).AsFloat;
query1.Next;
end;
Result := Soma;
end;
Se usar table, faça as adaptações pertinentes...
end;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)