hedgewars/uChat.pas
changeset 6287 68db7625060d
parent 6286 835392304f81
child 6379 ef4288298e57
--- a/hedgewars/uChat.pas	Sat Nov 05 09:37:17 2011 +0300
+++ b/hedgewars/uChat.pas	Sat Nov 05 09:38:07 2011 +0300
@@ -84,7 +84,7 @@
 
 font:= CheckCJKFont(str, fnt16);
 w:= 0; h:= 0; // avoid compiler hints
-TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(str), w, h);
+TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(str), @w, @h);
 
 resSurface:= SDL_CreateRGBSurface(0, toPowerOf2(w), toPowerOf2(h), 32, RMask, GMask, BMask, AMask);