aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Screens/UScreenName.pas
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-24 12:59:54 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-24 12:59:54 +0000
commite79530fd2165c92a9291076b05dfb0e0236fc222 (patch)
tree0d17948a5a907c90d18aa71b5b42e08eac0e951e /Game/Code/Screens/UScreenName.pas
parent8c3c4d3107df8a6fa9cddbc7360cd7fa36b39c95 (diff)
downloadusdx-e79530fd2165c92a9291076b05dfb0e0236fc222.tar.gz
usdx-e79530fd2165c92a9291076b05dfb0e0236fc222.tar.xz
usdx-e79530fd2165c92a9291076b05dfb0e0236fc222.zip
Added ability to Select Players before Song
Make Option OnSongClick Work git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@131 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--Game/Code/Screens/UScreenName.pas9
1 files changed, 8 insertions, 1 deletions
diff --git a/Game/Code/Screens/UScreenName.pas b/Game/Code/Screens/UScreenName.pas
index 82519e87..e8bc2dd8 100644
--- a/Game/Code/Screens/UScreenName.pas
+++ b/Game/Code/Screens/UScreenName.pas
@@ -8,6 +8,7 @@ uses
type
TScreenName = class(TMenu)
public
+ Goto_SingScreen: Boolean; //If True then next Screen in SingScreen
constructor Create; override;
function ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean; override;
procedure onShow; override;
@@ -49,7 +50,13 @@ begin
Ini.Name[I-1] := Button[I-1].Text[0].Text;
Ini.SaveNames;
Music.PlayStart;
- FadeTo(@ScreenLevel);
+
+ if GoTo_SingScreen then
+ FadeTo(@ScreenSing)
+ else
+ FadeTo(@ScreenLevel);
+
+ GoTo_SingScreen := False;
end;
// Up and Down could be done at the same time,