Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 27-04-2004
Avatar de seb@
seb@ seb@ is offline
Miembro
 
Registrado: ago 2003
Posts: 57
Poder: 21
seb@ Va por buen camino
Post El viejo y conocido tema de "redondeo"....

Hola a todos!!!

Busqué en los mensajes enviados con respecto a este tema, pero no encontre ninguna respuesta que me resolviera este problema.

Tengo que redondear un numero a dos decimales, hasta aquí, ningun problema(porque puedo hacerlo con el SimpleRoundTo(x, -2)). El problema pasa es que tengo un valor que no tiene decimales que también y que debería hacerselos aparecer con alguna función o método.

Ej: 124 me tiene que aparecer 124.00
0 me tiene que aperecer 0.00
12,346 me tiene que aperecer 12,35

Desde ya muchas gracias!!!!
__________________
Sebastian Ibarrola
--------------------------
Responder Con Cita
  #2  
Antiguo 27-04-2004
__cadetill __cadetill is offline
Miembro
 
Registrado: may 2003
Posts: 3.387
Poder: 24
__cadetill Va por buen camino
una vez tienes el valor redondeado, puedes usar la función FormatFloat

Código:
str := FormatFloat('#,##0.00', Valor);
En la máscara que he puesto, te mostrará el valor con 2 decimales y separador de millares
Responder Con Cita
  #3  
Antiguo 27-04-2004
Avatar de seb@
seb@ seb@ is offline
Miembro
 
Registrado: ago 2003
Posts: 57
Poder: 21
seb@ Va por buen camino
no me redondea los valore enteros o con un decimal

Hice como me indicaste pero cuando me aparece un valor 0 por ej. yo quiero que lo transforme a 0.00 y no lo esta haciendo sino que deja el 0.

Tambien cuando me aparece 1.5 quiero que me muestre 1.50, y no lo esta haciendo, lo que estoy haciendo es lo siguiente:

FormatFloat('#.##0.00', SimpleRoundTo(query.FieldValues['valor'], -2));

cuando viene un 0, lo deja tal cual, sin poner el formate 0.00. Con los demas valores no tengo problemas.

saludos
__________________
Sebastian Ibarrola
--------------------------
Responder Con Cita
  #4  
Antiguo 27-04-2004
Avatar de marcoszorrilla
marcoszorrilla marcoszorrilla is offline
Capo
 
Registrado: may 2003
Ubicación: Cantabria - España
Posts: 11.221
Poder: 10
marcoszorrilla Va por buen camino
Prueba esto a ver:

Código:
FormatFloat(',0.00', SimpleRoundTo(query.FieldValues['valor'], -2));
Un Saludo.
__________________
Guía de Estilo de los Foros
Cita:
- Ça c'est la caisse. Le mouton que tu veux est dedans.
Responder Con Cita
  #5  
Antiguo 27-04-2004
Avatar de seb@
seb@ seb@ is offline
Miembro
 
Registrado: ago 2003
Posts: 57
Poder: 21
seb@ Va por buen camino
esta es la mascara...

Con las guias que me supieron dar llegue a la mascara buscada:

FormatFloat('#0.#0', 0);
El valor es 0.00

Gracias por sus ayudas!!!!
__________________
Sebastian Ibarrola
--------------------------
Responder Con Cita
  #6  
Antiguo 28-04-2004
the darkness the darkness is offline
Miembro
 
Registrado: ene 2004
Posts: 30
Poder: 0
the darkness Va por buen camino
redondeo

si te sirve de algo existe una funcion llama "floattostrf" la cual te puede hacer eso que pides exactamente.

lo pones algo asi
edit1.text:=floattostr((25*145)/1234,ffnumber,6,2);

donde lo primero que se manda es la opraciòn o el numero a convertir.
el ffnumber es para dar una clasificaciòn.
el 6 es la presiciòn y se puede escoger desde 1 hasta .....
y el dos son los nùmero de caracteres.
atte
eduardo maldonado
Responder Con Cita
Respuesta


Herramientas Buscar en Tema
Buscar en Tema:

Búsqueda Avanzada
Desplegado

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 13:12:58.


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