PDA

Ver la Versión Completa : Problema de redondeo


cmgenny
08-08-2003, 19:04:21
Holas

Tengo un problemita cuando inteto hacer una suma con numeros reales, yo utilizo D5 y Paradox.

primero hago una consulta

miquery.add(select * from tabla1)
miquery.add(where campo.........)

luego de esto hago una sumatoria de un campo

var
suma: double
while not miquery.eof do
begin
suma:=suma + miquery.fieldbyname(sub total).asfloat
end

No puedo utilizar sum por que sub total es un campo calculado.
el problema esta en que si hago esto

label1.caption:=FloatToStr(suma)

redondea los valores y en el dbgrid los valores de sub total aparecen con sus decimales.

muchisimas gracias por su ayuda si no me explique bien avisenme

delphi.com.ar
08-08-2003, 19:11:37
¿Porqué no utilizas FormatFloat o alguna funcion similar para mostrar el valor en el formato que te guste?

Saludos!

cmgenny
08-08-2003, 20:11:10
El problema no es el formato si no que lo redondea, me explico si en el campo sub total la consulta trajo los valores
13.45
45.25
21.12
que hace un total de 79.82, la suma me da 80 y yo quiero que la suma me de 79.82

muchisimas gracias

delphi.com.ar
08-08-2003, 20:16:38
Por el código que tu comentas, se supone que en ningún lado estés redondeando.
¿Estas seguro/a que la consulta no retorna los valores redondeados?, porqué no sigues paso a paso tu código, o muestras los valores de tu Query en un grid o similar.

Por el tema de redondeo, te recomiendo este hilo: http://www.clubdelphi.com/foros/showthread.php?s=&threadid=2643