Funcao - problemas com arredondamento

Transcrevo parte do Help do Delphi sobre a função Round. Para mudar o

comportamento

'arredondamento de banqueiro' para o que tu queres, faça

SetRoundMode(rmNearest).

***Consulte as funções Round e SetRoundMode(...) no Help***