forgot this file in previous commit
authorkoda
Sun, 15 Nov 2009 19:43:58 +0000
changeset 2623 9332f744bbdf
parent 2622 39932161194e
child 2624 0c3d5549912e
forgot this file in previous commit
hedgewars/uStore.pas
--- a/hedgewars/uStore.pas	Sun Nov 15 19:42:28 2009 +0000
+++ b/hedgewars/uStore.pas	Sun Nov 15 19:43:58 2009 +0000
@@ -16,9 +16,10 @@
  * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA
  *)
 
+{$INCLUDE "options.inc"}
+
 unit uStore;
 interface
-{$INCLUDE "options.inc"}
 uses sysutils, uConsts, uTeams, SDLh,
 {$IFDEF GLES11}
 	gles11,
@@ -122,7 +123,7 @@
 Result.y:= Y;
 Result.w:= w + FontBorder * 2 + 4;
 Result.h:= h + FontBorder * 2;
-DrawRoundRect(@Result, cWhiteColor, cColorNearBlack, Surface, true);
+DrawRoundRect(@Result, cWhiteColor, cNearBlackColor, Surface, true);
 clr.r:= Color shr 16;
 clr.g:= (Color shr 8) and $FF;
 clr.b:= Color and $FF;
@@ -165,7 +166,7 @@
 		TryDo(texsurf <> nil, errmsgCreateSurface, true);
 		TryDo(SDL_SetColorKey(texsurf, SDL_SRCCOLORKEY, 0) = 0, errmsgTransparentSet, true);
 
-		DrawRoundRect(@r, cWhiteColor, cColorNearBlack, texsurf, true);
+		DrawRoundRect(@r, cWhiteColor, cNearBlackColor, texsurf, true);
 		rr:= r;
 		inc(rr.x, 2); dec(rr.w, 4); inc(rr.y, 2); dec(rr.h, 4);
 		DrawRoundRect(@rr, Clan^.Color, Clan^.Color, texsurf, false);
@@ -382,9 +383,9 @@
 
 InitHealth;
 
-PauseTexture:= RenderStringTex(trmsg[sidPaused], $FFFF00, fntBig);
-ConfirmTexture:= RenderStringTex(trmsg[sidConfirm], $FFFF00, fntBig);
-SyncTexture:= RenderStringTex(trmsg[sidSync], $FFFF00, fntBig);
+PauseTexture:= RenderStringTex(trmsg[sidPaused], cYellowColor, fntBig);
+ConfirmTexture:= RenderStringTex(trmsg[sidConfirm], cYellowColor, fntBig);
+SyncTexture:= RenderStringTex(trmsg[sidSync], cYellowColor, fntBig);
 
 AddProgress;
 
@@ -990,7 +991,7 @@
         substr:= copy(s, prevpos+1, pos-prevpos-1);
         if Length(substr) <> 0 then
            begin
-           tmpsurf:= TTF_RenderUTF8_Blended(Fontz[Font].Handle, Str2PChar(substr), cColorNearBlack);
+           tmpsurf:= TTF_RenderUTF8_Blended(Fontz[Font].Handle, Str2PChar(substr), cNearBlackColor);
 	   tmpsurf:= doSurfaceConversion(tmpsurf);
            rect.x:= edgeHeight + 1 + ((i - w) div 2);
            // trying to more evenly position the text, vertically