resta de dos numeros reales no da cero ...

[chelejuan]

Es asi de tonto :

var
valor1, valor2 : real;


le doy los valores en varios calculos.

Si lo miro con f7 veo que los dos pone 212,85 pero si los resto me salen valores de - 0,654654 elevado a no se cuanto y si pongo que si son iguales me dice que no.

¿Que sucede? ¿Que hago mal?.

Necesito saber si uno es mayor a otro, en realidad uno es el total y el otro es la suma, y necesito saber si el que es la suma se ha pasado del total para avisar.

Venga un saludo yg racias anticipadas

[delphi.com.ar]

Puedes utilizar la función CompareValue definida en la unit Math.
Call CompareValue to determine the relationship between two numeric values. When comparing floating-point values, CompareValue lets you specify a maximum difference to use when comparing values, so that they are considered the same if they are within that amount.

Saludos!

[chelejuan]

Muchas gracias, parece que funciono :D

Puse esto :

a1 := CompareText(floattostr(p1),floattostr(p2)); // donde p1 y p2 son real
Si a1 = 0 es que son iguales.

Venga un saludo y gracias de nuevo.

[delphi.com.ar]

Yo prefiero tratar siempre los tipos de datos como lo que son, si son nros reales utilizar las funciones creadas para estos.

Saludos!

[chelejuan]

¿Y cual es para reales?.

Tengo delphi 5.0 y muchas variables que leo en foros y me comentais pues no me aparecen y dan error.

Venga un saludo.

P.D. Y si claro es mejor usar la suya.