Mercurial Mercurial > hedgewars / diff
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | file | latest | revisions | annotate | diff | comparison | raw | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
hedgewars/uGearsHandlersMess.pas
changeset 13877 8c702a4839ec
parent 13851 f01798038c2e
child 13956 2568fa516733 
--- a/hedgewars/uGearsHandlersMess.pas	Tue Oct 09 09:02:39 2018 -0400
+++ b/hedgewars/uGearsHandlersMess.pas	Tue Oct 09 09:58:33 2018 -0400
@@ -4337,7 +4337,7 @@
         Gear^.Damage:= i;
         FreeAndNilTexture(Gear^.Tex);
         if Gear^.Health <> JETPACK_FUEL_INFINITE then
-            Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], inttostr(i)), cWhiteColor, fntSmall)
+            Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], ansistring(inttostr(i))), cWhiteColor, fntSmall)
         end;
 
     if (HHGear^.Message and (gmAttack or gmUp or gmLeft or gmRight) <> 0) and
@@ -5563,7 +5563,7 @@
             begin
             Gear^.Damage:= i;
             FreeAndNilTexture(Gear^.Tex);
-            Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], inttostr(i)),
+            Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], ansistring(inttostr(i))),
                          cWhiteColor, fntSmall)
             end
         end
@@ -5646,7 +5646,7 @@
             begin
             Gear^.Damage:= i;
             FreeAndNilTexture(Gear^.Tex);
-            Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], inttostr(i)),
+            Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], ansistring(inttostr(i))),
                          cWhiteColor, fntSmall)
             end
         end
@@ -6262,7 +6262,7 @@
     begin
     Gear^.Damage:= t;
     FreeAndNilTexture(Gear^.Tex);
-    Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], inttostr(t)),
+    Gear^.Tex := RenderStringTex(FormatA(trmsg[sidFuel], ansistring(inttostr(t))),
               cWhiteColor, fntSmall)
     end;
     if Gear^.Message and (gmUp or gmDown) <> 0 then
hedgewars