anchor.diff:  begin
     ctrl := TKMControl(Sender);
   
  -  if not DoShowPlayerMenu(Sender) then Exit;
  +  if not CanShowPlayerMenu(Sender) then Exit;
   
     //Remember which player it is by his server index
     //since order of players can change. If someone above leaves we still have the proper Id
  
positive.code:     procedure ChatMenuShow(Sender: TObject);
  
      procedure PlayerMenuClick(Sender: TObject);
      function DoShowPlayerMenu(Sender: TObject): Boolean;
      procedure PlayerMenuShow(Sender: TObject);
  
      procedure PlayersSetupChange(Sender: TObject);
  
negative.code: end;
  
  
  function TKMMenuLobby.CanShowPlayerMenu(Sender: TObject): Boolean;
  var
    ctrl: TKMControl;
  begin
  