Error el división

[fayala]

Un saludo a todos los del foro, tengo un problema que quizá es simple pero no lo puedo resolver, tengo una variable declarada, VarPrecio : Currency; y le asigno el resultado de: VarCostoMN / TArticulos.FieldByName('Politica').AsCurrency;
TArticulos.FieldByName('Precio').AsFloat := VarPrecio; (precio,campo calculado)
VarCostoMN es de tipo Currency también, pero a la hora de que ejecuto el programa y selecciono la opción de artículos, se crea el DataModule donde tengo la tabla que tiene los campos calculados y me manda el mensaje, Invalid floating point operation, como puedo resolver este problema?

Agradezco mucho su atención.