Problema con RoundTo en .NET

[roman]

Empezado por Al González

Como en Delphi Win32 no existe una previsión seria al respecto

No entiendo a qué te refieres. La función RoundTo, por defecto, usa el redondeo del banquero:

Empezado por ayuda de Delphi

RoundTo uses “Banker’s Rounding” to determine how to round values that are exactly midway between the two values that have the desired number of significant digits. This method rounds to an even number in the case that AValue is not nearer to either value.

Pero, como la misma ayuda dice, el método de redondeo se puede cambiar:

Empezado por ayuda de Delphi

Note: The behavior of RoundTo can be affected by the Set8087CW procedure or SetRoundMode function.

Y estas son las posibilidades:

Empezado por ayuda de Delphi

rmNearest -Rounds to the closest value. (banquero)
rmDown - Rounds toward negative infinity. (infinito negativo)
rmUp - Rounds toward positive infinity. (infinto positvo)
rmTruncate - Truncates the value, rounding positive numbers down and negative numbers up. (a cero)

Sólo faltaría el que, como mencionas, no es parte del estándar, pero que fácilmente se puede implementar con:

Sign(n)*Round(Abs(n));

usdando el método de infinito positivo.

// Saludos

[[Al González]]

¡Hola a todos!

Tienes toda la razón Román. Al menos en teoría. Lo que sucede es que ya intenté utilizar las funciones Set8087CW y SetRoundMode sin obtener el resultado que la misma ayuda refiere.

¿Podrías probarlas en tu estación de trabajo para verificar lo que digo? Tal vez se me pasó algo.

Gracias.

Un abrazo expectante.

Al González.

[roman]

¿Mi estación de trabajo? ¡Vaya nombre elegante para mi laptop en un escritorio desordenado, acompañado de un frasco de cacahuates, pero en fin

Pues probarlas, lo hice justo antes de responder este mensaje. Claro que mis pruebas se redujeron a los valores ejemplo que pusiste, pero no sési haga falta más.

// Saludos

[[Al González]]

OK

Voy a probar nuevamente. No te despegues de los cacahuates, regreso en unos minutos...

Al.

[dec]

Hola,

Empezado por Román

¿Mi estación de trabajo? ¡Vaya nombre elegante para mi laptop en un escritorio desordenado, acompañado de un frasco de cacahuates, pero en fin

[ modo jomer on ] Hum... cacahutes... [/ modo jomer off]

[roman]

Mmmm, ahora vengo, voy por una cerveza.

[[Al González]]

(eliminé este mensaje para evitar confusiones)