Otra solución al trabajar con campos de importes, es utilizar en vez de
AsFloat
AsCurrency, te ahorraras muchos problemas.

Salu2.

"Jorge Alvarez" <correoschafa***hotmail.com> escribió en el mensaje
news:bfh4nj$ejcvq$1***ID-116944.news.uni-berlin.de...
> > Antes de nada os diré que estoy trabajando en delphi 4 atacando a
> > interbase Firebird a través de BDE
> >
> > Todo empezó usando el método AsFloat aplicado a TField, las
> > operaciones de igualdad (AsFloat = AsFloat) me daban false cuando los
> > valores contenidos en ambos campos parecian ser iguales.
> >
> > Después intenté hallar la diferencia entre estos dos campos mediante
> > AsFloat de nuevo y me encontré con la sorpresa de que en el resultado
> > obtenia valores tal que así: 0,0000000000001 de ahí que no funcionara
> > la igualdad
> >
> > INSERT INTO TABLA(CAMPO_FLOTANTE) VALUES (1000.45)
> >
> > a la hora de obtener el valor tal que asi
> >
> > SELECT CAMPO_FLOTANTE, CAMPO_FLOTANTE - 1000 CAMPO_CALCULADO FROM
> > TABLA
> >
> > me devuelve en CAMPO_CALCULADO el valor 0,450000000000045
>
> Para complementar la respuesta de Jordi: Si acaso te resulta demasiado
> problemático cambiar el tipo de campo a Numeric, siempre tienes la función
> CAST. El siguiente ejemplo resuelve tu problema sin necesidad de
> reestructurar.
>
> select campo_flotante,cast(campo_flotante-1000 as numeric(9,2)) as
calculado
> from prueba
>
>
> Saludos,
>
> -Jorge
>
>