Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   redondear con dos decimales (https://www.clubdelphi.com/foros/showthread.php?t=39553)

JULIOCTORRESG 23-01-2007 23:29:19

redondear con dos decimales
 
buenas amigos del foro...

tengo el siguiente problema...tengo datos numericos en una tabla y quiero presentarlos en formato 2 enteros y 2 decimales, con otro lenguaje existe una funcion trunc que permite truncar cortar limitar la salida a este formato pero el problema es que quiero que redondee el valor

Ejemplo en la tabla tengo : 14,15213 que salga 14,15
14,15891 que salga 14,16

se seguro ya me entendieron y es inutil tanta explicacion el caso es que no se cual es la funcion que hace esto

agradecido por su ayuda...

roman 23-01-2007 23:37:40

Código Delphi [-]
ShowMessage(FormatFloat('0.00', 14.15891));

// Saludos

Crashthebig 15-04-2009 20:16:40

http://www.clubdelphi.com/foros/show...071#post345071

revisa en este hilo ahy hay una solucion.

Alexandro 15-04-2009 20:43:37

Puedes hacerlo de la sgte forma tambien:
Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  s:string;
  r:real 
begin
   real:=131313131.0982037;
   Str(r:2:2,s);
   ShowMessage(s);
end;

rgstuamigo 15-04-2009 20:53:46

Yo utilizarìa la funcion RoundTo;) que utiliza el redondeo bancario(Banker’s rounding)por ejemplo:
Código Delphi [-]
 RoundTo(14,15891,-2)=14,16 ;)
Ten en cuenta que el segundo parametro es el que indica la cantidad de decimales que quieres que aparesca, por supuesto tambien trabaja con el segundo parametro en positvo; aqui te pego unos ejemplo que viene en la ayuda de Delphi 7.
De la ayuda de Delphi>
Cita:

RoundTo(1234567, 3) 1234000
RoundTo(1.234, -2) 1.23
RoundTo(1.235, -2) 1.24
RoundTo(1.245, -2) 1.24
Note: The behavior of RoundTo can be affected by the Set8087CW procedure or SetRoundMode function.
Saludos....:cool:

agofay 27-09-2015 00:26:20

FormatFloat
 
Buscando eso mismo esncontré FormatFloat, lo cual me resultó muy cómoda y cumple el cometido
no tengo permiso editar la dirección del enlace, pero lo encontré en delphibasics co uk
donde explican sencilla y ampliamente el tema.

Intento pegar el código de ejemplo pero me sale el mensaje: Aún no tienes permitido poner enlaces ni imágenes
pero no tengo enlaces ni imágenes, asi que no se que pasa, se los quedo debiendo

Enlace: Delphi Basics : FormatFloat

ecfisa 27-09-2015 01:30:14

Hola agofay.
Cita:

Empezado por agofay (Mensaje 497209)
Intento pegar el código de ejemplo pero me sale el mensaje: Aún no tienes permitido poner enlaces ni imágenes
pero no tengo enlaces ni imágenes, asi que no se que pasa, se los quedo debiendo

No sucede nada extraño, para limitar el ingreso de publicidad no autorizada se estableció que se debe contar con un mínimo de diez (10) mensajes para poder publicar enlaces.

Cuando tengas esa cantidad lo podrás hacer sin inconvenientes, mientras tanto podes poner algún espacio en la dirección vg.:
http: //www.delphibasics.co.uk/RTL.asp?Name=FormatFloat

Luego algún moderador la corregirá.

Saludos :)


La franja horaria es GMT +2. Ahora son las 08:23:43.

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