Problema de redondeo

[cmgenny]

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