Valores após a virgula não aparecem!

09/04/2006

0

Pessoal, estou fazendo este select:

[color=green:50214b5128]
select sum(a.vl_lancamento), b.id_cliente, a.tipo_movimentacao from cc a, clientes b where a.id_cliente = b.id_cliente and a.id_cliente = :idcliente_cc and a.tipo_movimentacao = 4 group by b.id_cliente, a.tipo_movimentacao
[/color:50214b5128]

E depois, passos os parametros e jogo o resultado para um Edit..

[color=green:50214b5128]
datamodule2.calculacc.Close; datamodule2.calculacc.ParamByName(´idcliente_cc´).AsInteger := Strtoint(dbedit1.Text); datamodule2.calculacc.open; valorsoma := datamodule2.calculacc.fieldbyname(´sum´).asinteger; edit3.text := FormatFloat(´#,,0.00´, valorsoma);
[/color:50214b5128]

Só que ele não traz os valores apos a virgula, por exemplo: era para ele trazer 68,25... ele só traz os 68,00

porque? o que tem de errado?


Ricieri

Ricieri

Responder

Posts

09/04/2006

Ricieri

Pessoal, já achei o erro..
O erro estava nesta linha:

valorsoma := datamodule2.calculacc.fieldbyname(´sum´).asinteger;


mudei para:

valorsoma := datamodule2.calculacc.fieldbyname(´sum´).asreal;


ai funcionou.!!


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