Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 25-09-2003
Rabata Rabata is offline
Miembro
 
Registrado: jul 2003
Posts: 167
Poder: 21
Rabata Va por buen camino
funcion de redondeo de decimales

Mi cuestion es la siguiente;

Me gustaría saber si en Delphi, hay alguna instrucción k me redondee los decimales???

ejemplo:
6,3456780345

y lo k kiero obtener es:
6,346 (despues del redondeo)

Muchas Gracias por Vuestra Colaboración.......
Responder Con Cita
  #2  
Antiguo 25-09-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.932
Poder: 27
delphi.com.ar Va por buen camino
Hay ya muchos hilos en el foro que tratan este tema..-.
http://www.clubdelphi.com/foros/sear...der=descending

Saludos!
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita
  #3  
Antiguo 29-09-2003
Avatar de Al González
[Al González] Al González is offline
In .pas since 1991
 
Registrado: may 2003
Posts: 5.604
Poder: 29
Al González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en brutoAl González Es un diamante en bruto
¡Buen día a todos!

Rabata:

En Delphi existen dos funciones que te pueden servir: Round y SimpleRoundTo.

Round hace redondeo bancario al valor entero más cercano.

SimpleRoundTo hace redondeo aritmético asimétrico (yo le llamo asimétrico ascendente).

Por otra parte, actualmente estoy terminando unas funciones, que aparte de permitir redondear a precisiones decimales específicas (1, 2, 3... decimales), también permiten indicar uno de cinco tipos de redondeo posibles:

Bancario (predeterminado de Round, norma internacional "al par")
Asimétrico ascendente (predeterminado de SimpleRoundTo)
Asimétrico descendente
Simétrico ascendente
Simétrico descendente

El término ascendente o descendente se refiere a la manera en que se redondea un número cuando la parte a redondear está exactamente entre el posible valor redondeado inferior y el superior (potencia decimal de 5: .5, .xxx5, 50, 500 etc.), es decir, cuando es ascendente 0.5 sube a 1 y cuando es descendente 0.5 baja a 0.

La simetría o asimetría determina si se aplica la misma regla cuando el valor es negativo.

Para darte un ejemplo breve, en un sistema de facturación para el área comercial mexicana, establezco la variable TipoRedoNume (Tipo de Redondeo Numérico) a trnSimeDesc (Simétrico Descendente) al comienzo de la aplicación. Posteriormente puedo realizar llamadas a la función MonedRedoCent (Moneda Redondeada a Centavos), con la seguridad de que los cálculos monetarios serán redondeados según las normas mercantiles y fiscales de México.

Cuando gustes te puedo hacer llegar una copia de la biblioteca donde tengo dichas funciones.

Espero esto sea de utilidad. Seguimos en contacto.

Al González .
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 09:56:41.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi