changeset 9812 | a293a9ecdc82 |
parent 9791 | 446e4919b738 |
child 9950 | 2759212a27de |
child 9983 | 1b62d993cd2f |
--- a/hedgewars/uWorld.pas Fri Dec 20 22:25:06 2013 -0500 +++ b/hedgewars/uWorld.pas Sat Dec 21 15:39:16 2013 -0500 @@ -1306,6 +1306,14 @@ Tint($FF,$FF,$FF,$80) else untint; + if OwnerTex <> nil then + begin + r.x:= 2; + r.y:= 2; + r.w:= OwnerTex^.w - 4; + r.h:= OwnerTex^.h - 4; + DrawTextureFromRect(-OwnerTex^.w - NameTagTex^.w - 16, cScreenHeight + DrawHealthY + smallScreenOffset + 2, @r, OwnerTex) + end; // draw name r.x:= 2; r.y:= 2;