Ñão quer somar com oncalcfields

18/03/2003

0

Crei 2 campos calculados, Tcheque na tblCheques, e não esta funcionando, o que está errado.

procedure TFrmCheques.TblChequeCalcFields(DataSet: TDataSet);
begin
TblChequeTCheque.AsFloat:=0;
TblCheque.First;
while not TblCheque.Eof do begin
TblChequeTCheque.AsFloat:=TblChequeTCheque.AsFloat+TblChequeValorche.Value;
TblCheque.Next;
end;
Edit1.Text:=FloatToStr(TblChequeTCheque.AsFloat);
end;


Consorte

Consorte

Responder

Posts

18/03/2003

Anonymous

Você tem que fazer o campo cauculado receber o resultado de sua expressão.


Responder

18/03/2003

Consorte

Tcheque é o campo calculado, onde tem que receber a soma dos cheques.
ValorChe é o campo do valor de cada cheque e TblCheques é minha tabela.

Não quer funcionar no OncalcFields

procedure TFrmCheques.TblChequeCalcFields(DataSet: TDataSet);
begin
TblChequeTCheque.Value:=0;
while not TblCheque.Eof do
begin
TblChequeTCheque.Value:=TblChequeTCheque.Value+TblChequeValorChe.Value;
TblCheque.Next;
end;
Label2.Caption:=FloatToStr(TblChequeTcheque.Value);
end;


Responder

18/03/2003

Consorte

Não sei o que está acontecendo, com variavies e button, funcionou beleza, mas no oncalcfields com campo calculado não, alias, pode usar variavel dentro do ancalcfields?


Responder

18/03/2003

Anonymous

provavelmente não funcione porque para montagem do campo calculado esta sendo utilizado os outros registros da tabela criando-se uma referência circular (por exemplo para montar o valor do registro ´a´ o sistema precisa pegar o ´b´ e o ´c´, porém o ´b´ e o ´c´ também precisam do valor do ´a´ que não tem seu valor calculado)

sugiro você totalizar com uma query utilizando o group by e depois criar um campo lookup


Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

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

Aceitar