hedgewars/uGears.pas
changeset 14882 acb0526bf458
parent 14881 259840ca77e3
child 14899 4e3d81af71bf
--- a/hedgewars/uGears.pas	Tue Apr 30 17:00:23 2019 +0200
+++ b/hedgewars/uGears.pas	Tue Apr 30 18:25:04 2019 +0200
@@ -52,7 +52,7 @@
 function  IsClockRunning() : boolean;
 
 implementation
-uses SysUtils, uStore, uSound, uTeams, uRandom, uIO, uLandGraphics,
+uses uStore, uSound, uTeams, uRandom, uIO, uLandGraphics,
     {$IFDEF USE_TOUCH_INTERFACE}uTouch,{$ENDIF}
     uLocale, uAmmos, uStats, uVisualGears, uScript, uVariables,
     uCommands, uUtils, uTextures, uRenderUtils, uGearsRender, uCaptions,
@@ -292,7 +292,7 @@
                             if j = 0 then
                                 curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(i)), $ff808080, fntSmall)
                             else
-                                curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(i) + FormatSettings.DecimalSeparator + inttostr(j)), $ff808080, fntSmall);
+                                curHandledGear^.Tex:= RenderStringTex(ansistring(inttostr(i) + lDecimalSeparator + inttostr(j)), $ff808080, fntSmall);
                             end
                     end
                 // Timer of other gears