Added ability to make buttons invisible(and also unselectable) in Theme.

Visible = 0
Useful for f.e. the Exit Button from MainScreen
Fixed a bug in PartyNewRoundScreen that causes a crash when an Arrow Button is pressed

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@152 b956fd51-792f-4845-bead-9b4dfca2ff2c

1 files changed, 4 insertions, 1 deletions

diff --git a/Game/Code/Menu/UMenu.pas b/Game/Code/Menu/UMenu.pas
index c30b5c5c..4ad8270a 100644
--- a/Game/Code/Menu/UMenu.pas
+++ b/Game/Code/Menu/UMenu.pas
@@ -528,6 +528,9 @@ begin
 

   Button[Result].Z := ThemeButton.Z;

 

+  //Button Visibility

+  Button[Result].Visible := ThemeButton.Visible;

+

   //Some Things from ButtonFading

   Button[Result].SelectH := ThemeButton.SelectH;

   Button[Result].SelectW := ThemeButton.SelectW;

@@ -574,7 +577,7 @@ end;
 function TMenu.AddButton(X, Y, W, H, ColR, ColG, ColB, Int, DColR, DColG, DColB, DInt: real; Name, Format, Typ: String; Reflection: Boolean; ReflectionSpacing, DeSelectReflectionSpacing: Real): integer;

 begin

   // adds button

-  //SetLength is used to reduce Memory usement

+  //SetLength is used once to reduce Memory usement

   if (ButtonPos <> -1) then

   begin

     Result := ButtonPos;