no redondea correctamnete

no redondea correctamnete

Postby Vladimir Zorrilla » Thu Jan 18, 2007 12:32 am

Amigos
uso xharbour 0.82

No redondea correctamente en esta version de xharbour

local x:=5.8105

msgalert( round(x,3) )


sale 5.810


cuando deberia salir 5.811

si lo pongo directo si funciona bien

msgalert( round(5.8105))


porque

ha alguine le paso esto cual es la solucion
por q pasar a xharbour 0.99 es algo traumatico

Gracias
ME INTERESA FW Y XHB POR SER OPEN SOURCE
Vladimir Zorrilla
 
Posts: 225
Joined: Tue Feb 28, 2006 4:25 pm
Location: PERU

Postby Ruben Fernandez » Thu Jan 18, 2007 3:35 am

Vladimir:

Usando la lib de Nanforum toolkits (Nanfor.lib)
ese problema se soluciona.
La función es FT_Round().

Mira si tienes en xHarbour, yo la uso con Harbour y la compilo
en mis programas y me funciona bien.

Saludos.

Ruben Fernandez.
Ruben Fernandez
 
Posts: 366
Joined: Wed Aug 30, 2006 5:25 pm
Location: Uruguay

Postby Patricio Avalos Aguirre » Thu Jan 18, 2007 12:25 pm

en xharbour 9.61 funciona ok

msgalert( round(x,3) )
5.811000


saludos
Patricio
User avatar
Patricio Avalos Aguirre
 
Posts: 1060
Joined: Fri Oct 07, 2005 1:56 pm
Location: La Serena, Chile

Re: no redondea correctamnete

Postby ACC69 » Thu Jan 18, 2007 6:06 pm

Vladimir Zorrilla wrote:Amigos
uso xharbour 0.82

No redondea correctamente en esta version de xharbour

local x:=5.8105

msgalert( round(x,3) )


sale 5.810


cuando deberia salir 5.811

si lo pongo directo si funciona bien

msgalert( round(5.8105))


porque

ha alguine le paso esto cual es la solucion
por q pasar a xharbour 0.99 es algo traumatico

Gracias


Amigo estas usando 1 decimal de mas, es Round(x,2) , y asi te redondeara a 5.81
Adriano
ACC69
 
Posts: 632
Joined: Tue Dec 12, 2006 7:34 pm

Postby manuramos » Sun Jan 21, 2007 10:40 am

No estoy de acuerdo con ACC69. Efectivamente, debería salirte 5.811, sin embargo puedes probar con round(x,4) a ver que te sale. Si sólo necesitas 3 decimales puedes probar a pasar la cifra a string con str(round(x,4) ,12,3) o algo similar.

Un saludo.
Nos Gusta Programar
manuramos
 
Posts: 219
Joined: Mon Dec 26, 2005 7:25 pm
Location: Jerez de la Frontera (Spain)


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 47 guests