somando campos no ClientDataSet

27/06/2008

0

bom dia a todos,

Tenho um ClientDataSet com os campos valor1, valor2, valor3 inseridos no Fields Editor. E gostaria de somar esses campos e apresentar o valor em um edit.

Alguém sabe me ajudar??

Fico muito Grato


Ricklorente

Ricklorente

Responder

Posts

27/06/2008

Altingon

No evento oncalcfields vc pode colocar:
edit1.text := floattostr(valor1.value, valor2.value, valor3.value);

Espero ter ajudado


Responder

27/06/2008

Ricklorente

Infelizmente dessa maneira não deu muito certo.

ele me dá a msg: ´Too many actual parameters´.

Peço desculpa e vou tentar me explicar melhor.

Eu preciso na verdade somar 15 campos e não três e queria saber se existe alguma propriedade que some todos os campos no fields Editor do ClientDataSet para não ter que somar valor1+valor2+valor3...etc

Se não existir qual a maneira mais prática que vcs recomendam para somar todos os campos para um iniciante como eu???


Responder

27/06/2008

Altingon

Ou assim

var
  soma:real;
IBQuery1.First;
repeat
   soma := campo1.value + campo2.value +campo3.value + etc;
   IBQuery1.Next;
until IBQuery1.Eof;
Edit1.text := floattostr(soma);


espero ter ajudado


Responder

Que tal ter acesso a um e-book gratuito que vai te ajudar muito nesse momento decisivo?

Ver ebook

Recomendado pra quem ainda não iniciou o estudos.

Eu quero
Ver ebook

Recomendado para quem está passando por dificuldades nessa etapa inicial

Eu quero

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

Aceitar