# HG changeset patch # User sheepluva # Date 1391519064 -3600 # Node ID 9c24233ca1c5c529343a1873ba8480c473b0761d # Parent bab8a3cccdf86ff9e253616a14fb43547a54122d remove obsolete type conversions that messed with pas2c diff -r bab8a3cccdf8 -r 9c24233ca1c5 hedgewars/uStore.pas --- a/hedgewars/uStore.pas Tue Feb 04 13:47:43 2014 +0100 +++ b/hedgewars/uStore.pas Tue Feb 04 14:04:24 2014 +0100 @@ -1258,13 +1258,13 @@ // TODO: Recheck height/position calculation // get caption's dimensions -TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(caption), @i, @j); +TTF_SizeUTF8(Fontz[font].Handle, caption, @i, @j); // width adds 36 px (image + space) w:= i + 36 + wa; h:= j + ha; // get sub caption's dimensions -TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(subcaption), @i, @j); +TTF_SizeUTF8(Fontz[font].Handle, subcaption, @i, @j); // width adds 36 px (image + space) if w < (i + 36 + wa) then w:= i + 36 + wa; @@ -1288,7 +1288,7 @@ if extra <> '' then begin // get extra label's dimensions - TTF_SizeUTF8(Fontz[font].Handle, Str2PChar(extra), @i, @j); + TTF_SizeUTF8(Fontz[font].Handle, extra, @i, @j); if w < (i + wa) then w:= i + wa; inc(h, j + ha);