Cita:
Empezado por maxzama
Hola.
Programa a utilizar:
- Delphi xe2
Pregunta y problema:
- E probado varios códigos de redondeo, y me e dado cuenta de que No redondea a partir del numero 5, sino del numero 6.
Hay algún código que me redondee a partir del numero 5. Ejemplo:
35,145 = 35,15
___________________________________________
Código a utilizar para redondear:
- RoundTo(I,-2), -Str (I:2:2,Texto)
Espero sus respuesta por favor y gracias...
|
Hola maxzama,
Prueba realizada con Delphi 7
Código Delphi
[-]procedure TForm1.Button1Click(Sender: TObject);
var
I: Double;
begin
I := 35.145;
Label1.Caption := FormatFloat('0.00', I);
I := RoundTo(I, -2);
Label2.Caption := FormatFloat('0.00', I);
end;
Resultado = 35.15, con el RoundTo es mas que suficiente.
Un saludo.