Pues yo lo he probado tambien y me sale todo bien por ejemplo:
RoundTo(123,456789,-3)=123,457 ok
RoundTo(123,456789,-2)=123,46 ok
RoundTo(123,456789,-1)=123,5 ok
RoundTo(123,456789,0)=123 ok
Probado en Delphi 7.![Wink](http://www.clubdelphi.com/foros/images/smilies/wink.gif)
Me late que quisas estas haciendo algo mal.
![Confused](http://www.clubdelphi.com/foros/images/smilies/confused.gif)
Por que no pones tu codigo para que lo podamos ver.
![Wink](http://www.clubdelphi.com/foros/images/smilies/wink.gif)