aboutsummaryrefslogtreecommitdiffstats
path: root/Game/Code/Screens/UScreenSing.pas
diff options
context:
space:
mode:
authormogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-05-03 21:09:24 +0000
committermogguh <mogguh@b956fd51-792f-4845-bead-9b4dfca2ff2c>2007-05-03 21:09:24 +0000
commit0f327cf133373168d94538686b57c22ba364f2a8 (patch)
tree6bdddf941c78a34563c15c942f3aec6a47287915 /Game/Code/Screens/UScreenSing.pas
parent3114977b5509c775c93d5ba3d5220a1ff9d363a7 (diff)
downloadusdx-0f327cf133373168d94538686b57c22ba364f2a8.tar.gz
usdx-0f327cf133373168d94538686b57c22ba364f2a8.tar.xz
usdx-0f327cf133373168d94538686b57c22ba364f2a8.zip
Feature: It's now possible to move/skin the time progress thing (no fix positions anymore) (affected: UDraw.pas, UGraphic.pas, UThemes.pas, UScreenSing.pas, UScreenSingModi.pas)
Theme/Skin: Added the time stuff beneath the lyrics (as "the others" did too) git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@164 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
-rw-r--r--Game/Code/Screens/UScreenSing.pas24
1 files changed, 17 insertions, 7 deletions
diff --git a/Game/Code/Screens/UScreenSing.pas b/Game/Code/Screens/UScreenSing.pas
index 93c3ac48..3e66b197 100644
--- a/Game/Code/Screens/UScreenSing.pas
+++ b/Game/Code/Screens/UScreenSing.pas
@@ -12,7 +12,12 @@ type
PauseTime: Real;
NumEmptySentences: integer;
public
- TextTime: integer;
+ //TextTime: integer;
+
+ //TimeBar mod
+ StaticTimeProgress: integer;
+ TextTimeText: integer;
+ //eoa TimeBar mod
StaticP1: integer;
StaticP1ScoreBG: integer;
@@ -166,7 +171,12 @@ begin
LoadFromTheme(Theme.Sing);
// time
- TextTime := AddText(75, 14, 1, 8, 0.25, 0.25, 0.25, '00:00');
+ //TextTime := AddText(75, 14, 1, 8, 0.25, 0.25, 0.25, '00:00');
+
+ //TimeBar mod
+ StaticTimeProgress := AddStatic(Theme.Sing.StaticTimeProgress);
+ TextTimeText := AddText(Theme.Sing.TextTimeText);
+ //eoa TimeBar mod
StaticP1 := AddStatic(Theme.Sing.StaticP1);
StaticP1ScoreBG := AddStatic(Theme.Sing.StaticP1ScoreBG);
@@ -908,11 +918,11 @@ begin
// update static menu with time ...
Min := Round(Czas.Teraz) div 60;
Sec := Round(Czas.Teraz) mod 60;
- Text[TextTime].Text := '';
- if Min < 10 then Text[TextTime].Text := '0';
- Text[TextTime].Text := Text[TextTime].Text + IntToStr(Min) + ':';
- if Sec < 10 then Text[TextTime].Text := Text[TextTime].Text + '0';
- Text[TextTime].Text := Text[TextTime].Text + IntToStr(Sec);
+ Text[TextTimeText].Text := '';
+ if Min < 10 then Text[TextTimeText].Text := '0';
+ Text[TextTimeText].Text := Text[TextTimeText].Text + IntToStr(Min) + ':';
+ if Sec < 10 then Text[TextTimeText].Text := Text[TextTimeText].Text + '0';
+ Text[TextTimeText].Text := Text[TextTimeText].Text + IntToStr(Sec);
// .. and scores
if PlayersPlay = 1 then begin