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/uTeams.pas
changeset 10105 8c5fa1d15bd5
parent 10015 4feced261c68
child 10108 c68cf030eded 
--- a/hedgewars/uTeams.pas	Tue Feb 04 15:23:37 2014 +0100
+++ b/hedgewars/uTeams.pas	Tue Feb 04 16:35:31 2014 +0100
@@ -103,7 +103,7 @@
             else
                 AddVoice(sndVictory, Teams[0]^.voicepack);
 
-            AddCaption(s, cWhiteColor, capgrpGameState);
+            AddCaption(Str2PChar(s), cWhiteColor, capgrpGameState);
             SendStat(siGameResult, s);
             AddGear(0, 0, gtATFinishGame, 0, _0, _0, 3000)
             end;
@@ -334,7 +334,7 @@
         end;
     if cHedgehogTurnTime < 1000000 then
         ReadyTimeLeft:= cReadyDelay;
-    AddCaption(Format(shortstring(trmsg[sidReady]), CurrentTeam^.TeamName), cWhiteColor, capgrpGameState)
+    AddCaption(FormatPChar(trmsg[sidReady], Str2PChar(CurrentTeam^.TeamName)), cWhiteColor, capgrpGameState)
     end
 else
     begin
hedgewars