Commit 1718b23ffa9881076a5e4e5068dde5fa91f9c710
1 parent
c92a39b8
Exists in
master
runner: fix bug on start turn message
Showing
1 changed file
with
5 additions
and
3 deletions
Show diff stats
experiment_runner/units/game_control.pas
@@ -620,10 +620,12 @@ end; | @@ -620,10 +620,12 @@ end; | ||
620 | procedure TGameControl.EnablePlayerMatrix(AID:UTF8string; ATurn:integer; AEnabled:Boolean); | 620 | procedure TGameControl.EnablePlayerMatrix(AID:UTF8string; ATurn:integer; AEnabled:Boolean); |
621 | begin | 621 | begin |
622 | if FExperiment.PlayerFromID[AID].Turn = ATurn then | 622 | if FExperiment.PlayerFromID[AID].Turn = ATurn then |
623 | - CleanMatrix(AEnabled); | 623 | + begin |
624 | + CleanMatrix(AEnabled); | ||
624 | 625 | ||
625 | - if AEnabled then | ||
626 | - ShowPopUp('É sua vez! Clique sobre uma linha da matrix e confirme sua escolha.'); | 626 | + if AEnabled then |
627 | + ShowPopUp('É sua vez! Clique sobre uma linha da matrix e confirme sua escolha.'); | ||
628 | + end; | ||
627 | end; | 629 | end; |
628 | 630 | ||
629 | constructor TGameControl.Create(AOwner: TComponent;AppPath:string); | 631 | constructor TGameControl.Create(AOwner: TComponent;AppPath:string); |