# HG changeset patch
# User unc0rr
# Date 1161032792 0
# Node ID c9610ad20fefa0ac2e44dcb6ad727fd476006478
# Parent  a36102728776c00452297665b89a88262d86b52a
Make use of "unused" struct member (based on sdl_ttf example)

diff -r a36102728776 -r c9610ad20fef hedgewars/SDLh.pas
--- a/hedgewars/SDLh.pas	Mon Oct 16 19:20:13 2006 +0000
+++ b/hedgewars/SDLh.pas	Mon Oct 16 21:06:32 2006 +0000
@@ -110,7 +110,7 @@
                   r: Byte;
                   g: Byte;
                   b: Byte;
-                  unused: Byte;
+                  a: Byte;
                   end;
 
      PSDL_RWops = ^TSDL_RWops;
diff -r a36102728776 -r c9610ad20fef hedgewars/uStore.pas
--- a/hedgewars/uStore.pas	Mon Oct 16 19:20:13 2006 +0000
+++ b/hedgewars/uStore.pas	Mon Oct 16 21:06:32 2006 +0000
@@ -108,6 +108,7 @@
 clr.r:= Color shr 16;
 clr.g:= (Color shr 8) and $FF;
 clr.b:= Color and $FF;
+clr.a:= $FF;
 tmpsurf:= TTF_RenderUTF8_Blended(Fontz[Font].Handle, PChar(s), clr);
 Result.x:= X + 3;
 Result.y:= Y + 1;
@@ -374,6 +375,7 @@
 clr.r:= $FF;
 clr.g:= $FF;
 clr.b:= $FF;
+clr.a:= $FF;
 tmpsurf:= TTF_RenderUTF8_Solid(Fontz[Font].Handle, PChar(s), clr);
 SDLTry(tmpsurf <> nil, true);
 SDL_UpperBlit(tmpsurf, nil, Surface, @r);