Delphi (y Lazarus) posee muchas funciones para redondear y truncar números, pero en muchos casos no funcionan del todo bien o no permiten tener el control sobre lo que queremos mostrar. Por eso, personalmente prefiero trabajar el redondeo con el string, es decir, el texto que tenemos tras realizar la operación aritmética que queramos llevar a cabo.
He buscado y no he visto ningún lugar que ofrezca el código para hacerlo, de manera que os voy a poner el que yo utilizo.
