anchor.diff:        Rect := fGame.Viewport.GetMinimapClip;
         fPlayers.GetUnitsInRect(Rect, fTeamNames);
       end;
  -    Label_TeamName.Visible := fGame.ShowTeamNames;
     end;
   
     //Debug info
  
positive.code: begin
    if fGame.ShowTeamNames then
    begin
      for I := 0 to fTeamNames.Count - 1 do
      begin
        Label_TeamName.Caption := fPlayers[TKMUnit(fTeamNames[I]).GetOwner].PlayerName;
  
        X := TKMUnit(fTeamNames[I]).PositionF.X;
        Y := TKMUnit(fTeamNames[I]).PositionF.Y;
  
negative.code: 
  
  procedure TKMGamePlayInterface.KeyDown(Key: Word; Shift: TShiftState);
  var Rect: TKMRect;
  begin
    if fGame.IsPaused and not fReplay then Exit;
  
  