hedgewars/uRenderUtils.pas
changeset 7110 c91d33837b0d
parent 7069 bcf9d8e64e92
child 7291 ad4b6c2b09e8
child 7546 b50556f2a0e8
--- a/hedgewars/uRenderUtils.pas	Thu May 03 22:48:02 2012 +0200
+++ b/hedgewars/uRenderUtils.pas	Tue May 22 11:19:32 2012 +0200
@@ -39,7 +39,7 @@
 function  RenderSpeechBubbleTex(s: ansistring; SpeechType: Longword; font: THWFont): PTexture;
 
 implementation
-uses uUtils, uVariables, uConsts, uTextures, sysutils, uDebug;
+uses uUtils, uVariables, uConsts, uTextures, SysUtils, uDebug;
 
 procedure DrawRoundRect(rect: PSDL_Rect; BorderColor, FillColor: Longword; Surface: PSDL_Surface; Clear: boolean);
 var r: TSDL_Rect;
@@ -257,7 +257,7 @@
 var w, h: LongInt;
     finalSurface: PSDL_Surface;
 begin
-    if length(s) = 0 then s:= ' ';
+    if length(s) = 0 then s:= _S' ';
     font:= CheckCJKFont(s, font);
     w:= 0; h:= 0; // avoid compiler hints
     TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(s), @w, @h);