Nao estou conseguindo contar todos os registros!

Delphi

23/07/2003

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

Curtidas 0

Respostas

Fer

Fer

23/07/2003

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()


GOSTEI 0
POSTAR