diff options
author | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-04-26 19:42:55 +0000 |
---|---|---|
committer | whiteshark0 <whiteshark0@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2007-04-26 19:42:55 +0000 |
commit | b2518890d0dd62eeb96ee8b4b5f2d86e61ca75e7 (patch) | |
tree | aff3f22b7fc7ef8b8fe69d0714ffaf968e96ccdb /Game/Code/Screens | |
parent | 88180a90a43d3a5392b300b95d62249f11fed786 (diff) | |
download | usdx-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')
-rw-r--r-- | Game/Code/Screens/UScreenMain.pas | 20 |
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;
|