diff options
Diffstat (limited to 'Lua/src/base/UParty.pas')
| -rw-r--r-- | Lua/src/base/UParty.pas | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/Lua/src/base/UParty.pas b/Lua/src/base/UParty.pas index 713cfc33..1ec0f82d 100644 --- a/Lua/src/base/UParty.pas +++ b/Lua/src/base/UParty.pas @@ -365,7 +365,7 @@ end; //---------- procedure TPartyGame.GenScores; var - I: byte; + I: Integer; begin if (Length(Teams) = 2) then begin // score generation for 2 teams, winner gets 1 point @@ -524,6 +524,8 @@ begin Self.Rounds[I].Mode := GetRandomMode; Self.Rounds[I].AlreadyPlayed := False; + + SetLength(Self.Rounds[I].Ranking, 0); end; // get the party started!11 |