Delphi-Quellcode:
var n:real; s:string;
begin
n:=9.995;
str(n:0:20,s);
ShowMessage(s);
end;
Hier besser
Trunc verwenden, denn sonst behebt man keinen Fehler, sondern verschieb ihn nur.
SetRoundMode gibt es zwar auch noch, aber sowas global umzustellen ist nicht unbedingt optimal.