Ayuda con redondeo

[Oscar Guzmán]

Saludos a todos en el foro


Quisiera saber si alguien me puede ayudar con lo siguiente:


Tengo que redondear los productos de una tabla, respecto a sus precios y costos siendo lo partícular de este asunto que no se tiene que redondear los decimales sino de la siguiente forma.


Producto 1 : 25.430,25 debe quedar en 25.990,00
Producto 2 : 36.751,00 debe quedar en 36.990,00
Producto 3 : 18.950,45 debe quedar en 18.990,00
Producto 4 : 18.992,00 debe quedar en 19.990,00
Y así sucesivamente con todos los productos que han sido llamados para actualizar su precio, es decir, todos deben ser llevados a la cifra 990 más cercana en incremento.



La función de round de delphi no me ayuda en este sentido y quisiera saber si alguien haya tenido un caso parecido y me oriente con esto


Gracias.