hedgewars/uRenderUtils.pas
changeset 10106 4020864e3d79
parent 10105 8c5fa1d15bd5
child 10107 dd6541ba745e
--- a/hedgewars/uRenderUtils.pas	Tue Feb 04 16:35:31 2014 +0100
+++ b/hedgewars/uRenderUtils.pas	Tue Feb 04 17:18:05 2014 +0100
@@ -283,7 +283,7 @@
 var w, h: LongInt;
     finalSurface: PSDL_Surface;
 begin
-    if StrLength(s) = 0 then s:= Str2PChar(''); // conversion because pas2c ain't smart enough yet;
+    if s[0] = #0 then s:= Str2PChar(''); // conversion because pas2c ain't smart enough yet;
     font:= CheckCJKFont(s, font);
     w:= 0; h:= 0; // avoid compiler hints
     TTF_SizeUTF8(Fontz[font].Handle, s, @w, @h);