hedgewars/uMisc.pas
changeset 1346 b4d51b95aa16
parent 1298 18fdc25fe65d
child 1530 3b8d723661b2
--- a/hedgewars/uMisc.pas	Sun Oct 12 17:04:07 2008 +0000
+++ b/hedgewars/uMisc.pas	Mon Oct 13 12:58:44 2008 +0000
@@ -186,7 +186,7 @@
 
 function FloatToStr(n: hwFloat): shortstring;
 begin
-FloatToStr:= cstr(n)
+FloatToStr:= cstr(n) + '_' + inttostr(Lo(n.QWordValue))
 end;
 
 function DxDy2Angle(const _dY, _dX: hwFloat): GLfloat;