ActiveDelphi

[RobertoCAN]

use o evento beforepost

[Sufolk]

Nem sei mais o que está acontecendo. Remova os campos da query e faça assim:
CDS_TABELA.FieldByName(\'TOTAL\').asFloat := CDS_TABELA.FieldByName(\'QUANT\').asFloat + CDS_TABELA.FieldByName(\'VALOR\').asFloat;
Bom se não funcionar não sei o que está acontecendo. Todos os campos são numerics de que precisão?
Que componentes você está usando???

[luc2403]

[quote]Nem sei mais o que está acontecendo. Remova os campos da query e faça assim:
CDS_TABELA.FieldByName(\'TOTAL\').asFloat := CDS_TABELA.FieldByName(\'QUANT\').asFloat + CDS_TABELA.FieldByName(\'VALOR\').asFloat;
Bom se não funcionar não sei o que está acontecendo. Todos os campos são numerics de que precisão?
Que componentes você está usando???
[/quote]
Olha eu estou fazendo assim:
Eu multiplico a quantidade pelo valor unitario que gera o valor total do item;
E no final eu quero colocar em Dbedit a soma do valor total de todos os itens para gera o valor do pedido.
As informações estao em um dbgrid;
O que é CDS?

[Sufolk]

var
fValor : Real;
begin
fValor := 0;
QueryDosIntens.Fist;
while not QueryDosIntens.Eof do begin
fValor := fValor + QueryDosIntens.FieldByName(\'TOTAL_ITEM\').asFloat;
QueryDosIntens.Next;
end;

DBEdit.Text := FloatToStr(fValor);

- a query ligada ao DBEdit deve estar em modo de insercao ou edição.
- o campo TOTAL_ITEM da query QueryDosIntens é a multiplicacao do valor unitario * quantidade que você falou abaixo;
- CDS_TABELA é o nome data pelo camarada DRONFLY se assemelha à tabela que criei na cabeça chamada QueryDosIntens;