aboutsummaryrefslogtreecommitdiffstats
path: root/ServiceBasedPlugins/src/screens/UScreenPartyWin.pas
diff options
context:
space:
mode:
authortobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-03-21 19:59:22 +0000
committertobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>2009-03-21 19:59:22 +0000
commitc08726cd35fc71e85ba767b67aa73b77538af307 (patch)
treee617a903dd2d4a6c9f8ff81da4b9527185745445 /ServiceBasedPlugins/src/screens/UScreenPartyWin.pas
parentb38772ffdbcc6bf2189d0e14a9828f911ea44a7d (diff)
downloadusdx-c08726cd35fc71e85ba767b67aa73b77538af307.tar.gz
usdx-c08726cd35fc71e85ba767b67aa73b77538af307.tar.xz
usdx-c08726cd35fc71e85ba767b67aa73b77538af307.zip
whiteshark's new plugin mode check-in
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/branches/experimental@1644 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to 'ServiceBasedPlugins/src/screens/UScreenPartyWin.pas')
-rw-r--r--ServiceBasedPlugins/src/screens/UScreenPartyWin.pas15
1 files changed, 8 insertions, 7 deletions
diff --git a/ServiceBasedPlugins/src/screens/UScreenPartyWin.pas b/ServiceBasedPlugins/src/screens/UScreenPartyWin.pas
index 64a50737..6b4a55c0 100644
--- a/ServiceBasedPlugins/src/screens/UScreenPartyWin.pas
+++ b/ServiceBasedPlugins/src/screens/UScreenPartyWin.pas
@@ -127,9 +127,9 @@ begin
end;
procedure TScreenPartyWin.onShow;
-var
- I: Integer;
- Placing: TeamOrderArray;
+//var
+// I: Integer; // Auto Removed, Unused Variable
+// Placing: Integer; // Auto Removed, Unused Variable
Function GetTeamColor(Team: Byte): Cardinal;
var
@@ -143,12 +143,13 @@ var
begin
inherited;
+ // to-do : Party
//Get Team Placing
- Placing := PartySession.GetTeamOrder;
+ //Placing := PartySession.GetTeamOrder;
//Set Winnertext
- Text[TextWinner].Text := Format(Language.Translate('PARTY_SCORE_WINS'), [PartySession.Teams.Teaminfo[Placing[0]].Name]);
- if (PartySession.Teams.NumTeams >= 1) then
+ //Text[TextWinner].Text := Format(Language.Translate('PARTY_SCORE_WINS'), [PartySession.Teams.Teaminfo[Placing[0]].Name]);
+ {if (PartySession.Teams.NumTeams >= 1) then
begin
Text[TextScoreTeam1].Text := InttoStr(PartySession.Teams.TeamInfo[Placing[0]].Score);
Text[TextNameTeam1].Text := String(PartySession.Teams.TeamInfo[Placing[0]].Name);
@@ -275,7 +276,7 @@ begin
Static[StaticTeam3].Visible := False;
Static[StaticTeam3BG].Visible := False;
Static[StaticTeam3Deco].Visible := False;
- end;
+ end; }
end;
procedure TScreenPartyWin.SetAnimationProgress(Progress: real);