value out of bounds

[merlin]

lo de en la de la asignacion al campo y el error lo da xq cuando hace la operacion de la resta no la hace bien.

ent:=((table1.fieldbyname('stockini').AsFloat)+(entrada.fieldbyname('entradas').AsFloat));
sal:=salida.fieldbyname('salidas').AsFloat;

stock:=ent-sal;<-------hay!!

table1.FieldByName('stockact').AsFloat:=stock;

ej:

ent=(0.6+540)
ent=540.6

sal=540.6

stock=540.6-540.6 //al hacer esto da un valor muy raro.
stock=1.241570365e-13 //y claro esto es lo q hace q de el error ese de value out of bouns
xq el campo de la tabla es de (6parte entra,2parte decimal).

sabes xq hace la resta mal o q es lo q puede estar pasando???