Pessoal    

Seguinte estou com problema na formatacao e inclusao de valres no banco de
dados,

Bom  no meu Banco de Dados tenho um campo 

 

VITEM         NUMBER(15,2)

 

E no meu programa o usuário vai digitar um valor total e eu terei que
dividir este

Valor por uma quantidade  X   e colocar este valor dividido no campo da
Tabela VITEM

Bom ae faço assim

 

var

c:string;

b,valor_sub,a:double;

 

begin

valor_sub:=(StrToFloat(edit3.text) / StrToFloat(edit2.text));
-------->>>valor_total dividido pela quantidade

a:=StrToFloat(edit3.text));

b:=StrtoFloat(edit4.text);

b:=b* dm_principal.Qry_Prestador_ambquantidade_consulta.value;
------------------- refazer calculo para verificar

showmessage('valor b'+floattostr(b)); ------ coloquei só vizualizar

c:=floattostr(a-b);  ------- só par aver a diferenca

showmessage('diferenca c'+(c));  ------ coloquei só vizualizar mostra a
diferenca

 

então o que acontece

 

Quando vou colocar no Banco de dados estas informacoe elas entram com
diferenca

 

Vamos supor  Valor Total =200

                     Quantidade=15

                     VITEM= 13,33333333333333

 

Na inserção no Banco fica 13,33

Mas na Soma  no Banco ae Fica 199,95                

 

O que me da 0,05 diferenca de alguns centavos não chegando a 200,00

 Alguém sabe onde estou errando?

Ou se neste caso vou ter que incrementar um VITEM com a Diferenca?

Desde já agradeco

 

 



[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a