Utilizamos cookies propias y de terceros. [Más información sobre las cookies].
Política de cookies
Proyecto AjpdSoft

· Inicio
· Buscar
· Contactar
· Cookies
· Descargas
· Foros
· Historia
· Nosotros
· Temas
· Top 10
· Trucos
· Tutoriales
· Wiki
Proyecto AjpdSoft: Foros

AjpdSoft :: Ver tema - Calculos con números reales error
Foros de discusión Buscar Perfil FAQ Iniciar sesión
Information Calculos con números reales error

Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net   
Ver tema anterior :: Ver tema siguiente
AutorMensaje
luisperez
Usuario


Registrado: Oct 20, 2011
Mensajes: 1

Asunto: Calculos con números reales error Responder citando

Hola, tengo una aplicación en delphi y tengo muchos problemas con el arrastre de decimales una de las cosas que me pasa y no entiendo porque es:
a,b,c son definidos como real

b:=504.75;
c:=0.02;
a:=strtofloat(formatfloat('#.00',(b*d));

Pues en un modulo a:= 10.09 y en otro procedimiento idéntico me devuelve a:=10.1 ( con un solo decimal).

Sabes de que puede ser? le he dados vueltas y vueltas, incluso he copiado el código de un procedimiento a otro y nada.

Uso delphi 3.0 en esta aplicación. icon_biggrin.gif icon_biggrin.gif
MensajePublicado:
Jue Oct 20, 2011 8:52 am
Top of PageVer perfil de usuario
agustinbus
Excelente usuario


Registrado: Apr 17, 2009
Mensajes: 38

Asunto: Responder citando

Hola luis perez! en vez de hacerlo asi:
Código:

var
a,b,c : real;
begin
b:=504.75;
c:=0.02;
a:=strtofloat(formatfloat('#.00',b*c));


prueba de la siguiente manera, a mi me funciono:
Código:

var
a,b,c : real;
begin
b:=504.75;
c:=0.02;
a := b * c;
showmessage(formatfloat('#.00',a));


arroja el siguiente resultado: 10,10 (con dos decimales)

si realizas el calculo manualmente:
504,75 * 0,02 = 10,095 por lo tanto el redondeo quedaria 10,10 no 10,09.

Saludos!
MensajePublicado:
Dom Oct 23, 2011 3:21 pm
Top of PageVer perfil de usuario
Mostrar mensajes de anteriores:   
Todas las horas son GMT - 1 Horas
Publicar nuevo tema Responder al tema
Foros de discusión » Borland Delphi, Codegear Delphi .Net  

Cambiar a:  
Key
  Puede publicar nuevos temas en este foro
No puede responder a temas en este foro
No puede editar sus mensajes en este foro
No puede borrar sus mensajes en este foro
No puede votar en encuestas en este foro
Visita nuestro nuevo sitio web con programas y contenidos actualizados: Proyecto A