Somar dados

Question

Ola pessoal !!!!Algu�m sabe como somar dados de uma tabela???Tipo assim no meu programa de cadastro  h� uma formulario e nele h� um button ao clicar no buton e este deve me trazer o total de clientes ...

Wallacest · Answer

bem, imagino que tenha um campo chamado Sexo ou coisa parecida

Vc pode pediar para ele percorrer a tabela procurando
Tipo

Var Mulher, Homem : Integer
While not TCliente.eof Do
Begin
If TClienteSexo.AsString = �M� Then
Begin
Homem := Homem + 1;
End;
If TClienteSexo.AsString = �F� Then
Begin
Mulher := Mulher + 1;
End;
TCLiente.next
end;
ShowMessage (��+Homem+� Homens�#10��+Mulher+� Mulheres)�);
end;

Essa rotina � para BD PARADOX usando Componente TABLE, tb pode usar SQL, ai � outro caso, mais � facil tb.

Qualquer duvida
Acho que isso pode t ajudar

Wallacest · Answer

bem, imagino que tenha um campo chamado Sexo ou coisa parecida

Vc pode pediar para ele percorrer a tabela procurando
Tipo

Var Mulher, Homem : Integer
While not TCliente.eof Do
Begin
If TClienteSexo.AsString = �M� Then
Begin
Homem := Homem + 1;
End;
If TClienteSexo.AsString = �F� Then
Begin
Mulher := Mulher + 1;
End;
TCLiente.next
end;
ShowMessage (��+Homem+� Homens�#10��+Mulher+� Mulheres)�);
end;

Essa rotina � para BD PARADOX usando Componente TABLE, tb pode usar SQL, ai � outro caso, mais � facil tb.

Qualquer duvida
Acho que isso pode t ajudar

F�rum Somar dados #166815