Fórum Nao estou conseguindo contar todos os registros! #170908

23/07/2003

0

Olá, uso BD Paradox com Delphi5, e estou com um problema, tenho um table1 com o campo valor... porem quero somar o valor de todos os registros.. jah tentei de tudo, mas naum funciona.. ele naum conta o ultimo registro, e caso haja soh um registro este naum eh contado.. o que pode estar acontecendo? segue abaixo os codigos q testei:

table1.first;
repeat
...
table1.next;
until table1.eof;

for i := 0 to table1.recordcount - 1 do
begin ...

end;

table1.first;
while not table1.eof do
begin
...
end;


o que pode estar acontecendo?

desde jah agradeco

[]s


Titanius

Titanius

Responder

Posts

23/07/2003

Fer

Eu tenho essa rotina que funciona blz

varSoma:=0;
tabela.First;
While Not DM.TBItem.eof do
begin
    varSoma:=varSoma+TabelaValortotal.asfloat;
    tabela.Next;
end;


Uma outra opção e vc fazr com SQL com a função SUM()


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar