diff --git a/experiment_runner/units/game_control.pas b/experiment_runner/units/game_control.pas index f18244f..897049e 100644 --- a/experiment_runner/units/game_control.pas +++ b/experiment_runner/units/game_control.pas @@ -620,10 +620,12 @@ end; procedure TGameControl.EnablePlayerMatrix(AID:UTF8string; ATurn:integer; AEnabled:Boolean); begin if FExperiment.PlayerFromID[AID].Turn = ATurn then - CleanMatrix(AEnabled); + begin + CleanMatrix(AEnabled); - if AEnabled then - ShowPopUp('É sua vez! Clique sobre uma linha da matrix e confirme sua escolha.'); + if AEnabled then + ShowPopUp('É sua vez! Clique sobre uma linha da matrix e confirme sua escolha.'); + end; end; constructor TGameControl.Create(AOwner: TComponent;AppPath:string); -- libgit2 0.21.2