aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Screens/UScreenMain.pas
diff options
context:
space:
mode:
authorwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-26 19:42:55 +0000
committerwhiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-04-26 19:42:55 +0000
commitb2518890d0dd62eeb96ee8b4b5f2d86e61ca75e7 (patch)
treeaff3f22b7fc7ef8b8fe69d0714ffaf968e96ccdb /Game/Code/Screens/UScreenMain.pas
parent88180a90a43d3a5392b300b95d62249f11fed786 (diff)
downloadusdx-b2518890d0dd62eeb96ee8b4b5f2d86e61ca75e7.tar.gz
usdx-b2518890d0dd62eeb96ee8b4b5f2d86e61ca75e7.tar.xz
usdx-b2518890d0dd62eeb96ee8b4b5f2d86e61ca75e7.zip
Added PS3 like ButtonFade ability
Some new ThemeButton Attributes: DeSelectReflectionSpacing: ReflectionSpacing when Button is not Selected Fade: Enable Stepings in Fading FadeText: Fade Texts with Button SelectW, SelectH: Width and Height when Button is Selected FadeTex: Texture used when Button Fades to not stretch the Texture. Not nessecary. FadeTexPos: Position of FadeTex git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@143 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'Game/Code/Screens/UScreenMain.pas')
-rw-r--r--Game/Code/Screens/UScreenMain.pas20
1 files changed, 1 insertions, 19 deletions
diff --git a/Game/Code/Screens/UScreenMain.pas b/Game/Code/Screens/UScreenMain.pas
index 28c255d1..4c822640 100644
--- a/Game/Code/Screens/UScreenMain.pas
+++ b/Game/Code/Screens/UScreenMain.pas
@@ -23,7 +23,7 @@ type
implementation
-uses Windows, UGraphic, UMain, UIni, UTexture, USongs, Textgl, opengl, ULanguage, UParty, UDLLManager, UScreenCredits;
+uses Windows, UGraphic, UMain, UIni, UTexture, USongs, Textgl, opengl, ULanguage, UParty, UDLLManager, UScreenCredits, USkins;
function TScreenMain.ParseInput(PressedKey: Cardinal; ScanCode: byte; PressedDown: Boolean): Boolean;
@@ -149,24 +149,6 @@ begin
TextDescriptionLong := AddText(Theme.Main.TextDescriptionLong);
Interaction := 0;
-
- //Some Testing for Button Fade
-{ Button[0].SelectH := Button[0].H * 3;
- Button[0].Fade := True;
- Button[0].FadeText := True;
- Button[0].DeSelectReflectionspacing := 280;
-
- Button[1].SelectH := Button[0].H * 3;
- Button[1].Fade := True;
-
- Button[2].SelectH := Button[0].H * 3;
- Button[2].Fade := True;
- Button[2].FadeText := True;
-
- Button[3].SelectH := Button[0].H * 3;
- Button[3].Fade := True;
- Button[3].FadeText := True;
-}
end;
procedure TScreenMain.onShow;