Calculo con decimales

[Carlos Arevalo]

Que tal Amigos

El problema es el sig:

un cliente tiene hecho en excel un calculo para el iva de la siguiente manera.

Divide el monto total ya con el iva incluido 185 entre 1,09 = 169,72 y luego calcula el iva multiplicando por 9% y el resultado que da es 15,27522936 que al darle el formato para 2 decimales queda en 15,28.

El objetivo de esta funcion es intruducir el monto ya con iva y que la funcion separe la base del iva y de esta manera trabajar con montos redondos sin decimales.

Cuando yo hago este mismo calculo en Delphi el resultado del iva es 15,2748 al ponerle dos decimales me queda en 15,27.

Como puedo hacer para que el calculo me de como en la hoja de excel 15,2752 y al ponerle dos decimales de 15,28 cual es el error?

Código Delphi [-]
base.text:=formatfloat('#,##0.00',strtofloat(monto.Text)/((100+strtofloat(ivax.Text))/100));
ivamonto.Text:= formatfloat('#,##0.00',(strtofloat(base.text)* strtofloat(ivax.Text)) / 100);