From 09cb93c06202febc160b644b384a8d7d29978c04 Mon Sep 17 00:00:00 2001
From: k-m_schindler <k-m_schindler@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Sat, 23 Feb 2013 15:47:29 +0000
Subject: medley mod: Themes modifications. This is considered the last part of
 the medley mod.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@2946 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 src/screens/UScreenScore.pas | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'src/screens/UScreenScore.pas')

diff --git a/src/screens/UScreenScore.pas b/src/screens/UScreenScore.pas
index 4b7332b4..82b73ea2 100644
--- a/src/screens/UScreenScore.pas
+++ b/src/screens/UScreenScore.pas
@@ -168,6 +168,8 @@ type
       TextGolden_ActualValue: array[1..6] of integer;
 
       ActualRound:          integer;
+      StaticNavigate:       integer;
+      TextNavigate:         integer;
 
       procedure RefreshTexts;
       procedure ResetScores;
@@ -577,6 +579,9 @@ begin
     aPlayerScoreScreenTextures[Player].Player_Id_Box := Texture.GetTexture(Skin.GetTextureFileName('PlayerIDBox0' + IntToStr(Player)), Texture_Type_Transparent);
   end;
 
+  StaticNavigate := AddStatic(Theme.Score.StaticNavigate);
+  TextNavigate := AddText(Theme.Score.TextNavigate);
+
   LoadSwapTextures;
 end;
 
@@ -701,6 +706,14 @@ begin
   begin
     for P := 0 to PlayersPlay - 1 do
       Player[P] := PlaylistMedley.Stats[ActualRound].Player[P];
+
+    Statics[StaticNavigate].Visible := true;
+    Text[TextNavigate].Visible := true;
+  end
+  else
+  begin
+    Statics[StaticNavigate].Visible := false;
+    Text[TextNavigate].Visible := false;
   end;
 
   MapPlayersToPosition;
-- 
cgit v1.2.3