diff options
Diffstat (limited to 'Game/Code/Screens/UScreenPartyPlayer.pas')
| -rw-r--r-- | Game/Code/Screens/UScreenPartyPlayer.pas | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/Game/Code/Screens/UScreenPartyPlayer.pas b/Game/Code/Screens/UScreenPartyPlayer.pas index 0bf76615..e6d0c924 100644 --- a/Game/Code/Screens/UScreenPartyPlayer.pas +++ b/Game/Code/Screens/UScreenPartyPlayer.pas @@ -367,6 +367,19 @@ begin SDLK_ESCAPE :
begin
+ for I := 1 to 4 do
+ Ini.Name[I-1] := Button[I].Text[0].Text;
+
+ for I := 6 to 9 do
+ Ini.Name[I-2] := Button[I].Text[0].Text;
+
+ for I := 11 to 14 do
+ Ini.Name[I-3] := Button[I].Text[0].Text;
+
+ Ini.NameTeam[0] := Button[0].Text[0].Text;
+ Ini.NameTeam[1] := Button[5].Text[0].Text;
+ Ini.NameTeam[2] := Button[10].Text[0].Text;
+
Ini.SaveNames;
Music.PlayBack;
FadeTo(@ScreenPartyOptions);
@@ -374,6 +387,19 @@ begin SDLK_RETURN:
begin
+ for I := 1 to 4 do
+ Ini.Name[I-1] := Button[I].Text[0].Text;
+
+ for I := 6 to 9 do
+ Ini.Name[I-2] := Button[I].Text[0].Text;
+
+ for I := 11 to 14 do
+ Ini.Name[I-3] := Button[I].Text[0].Text;
+
+ Ini.NameTeam[0] := Button[0].Text[0].Text;
+ Ini.NameTeam[1] := Button[5].Text[0].Text;
+ Ini.NameTeam[2] := Button[10].Text[0].Text;
+
Ini.SaveNames;
//Save PlayerNames
for I := 0 to PartySession.Teams.NumTeams-1 do
|