on construct me 
  me.ancestor.construct()
  me.pViewMode = #info
  me.pViewModeComponents = [#info:["List", "Details"], #highscore:["List", "Highscore"]]
  return TRUE
end

on deconstruct me 
  return(me.ancestor.deconstruct())
end

on getGameTypeHandlerClass me, tGameType 
  tGameTypeService = me.getIGComponent("GameTypes")
  if (tGameTypeService = 0) then
    return FALSE
  end if
  tTypeStr = tGameTypeService.getGameTypeString(tGameType)
  tMemName = "IG GameListUI" && tTypeStr && "Class"
  if not memberExists(tMemName) then
    tClass = "IG GameListUI Details Class"
  else
    tClass = ["IG GameListUI Details Class", tMemName]
  end if
  return(tClass)
end

on getSubComponent me, tID, tAddIfMissing 
  tObject = me.pSubComponentList.getaProp(tID)
  if tObject <> 0 then
    return(tObject)
  end if
  if not tAddIfMissing then
    return FALSE
  end if
  if (tID = "Highscore") then
    tClass = ["IG GameListUI Details Class", "IG GameListUI Highscore Class"]
  else
    if (tID = "Details") then
      tService = me.getMasterIGComponent()
      if (tService = 0) then
        return FALSE
      end if
      tItemRef = tService.getObservedGame()
      if (tItemRef = 0) then
        tItemRef = tService.getJoinedGame()
      end if
      if (tItemRef = 0) then
        tClass = me.getGameTypeHandlerClass()
      else
        tClass = me.getGameTypeHandlerClass(tItemRef.getProperty(#game_type))
      end if
    else
      tClass = "IG GameListUI" && tID && "Class"
    end if
  end if
  return(me.initializeSubComponent(tID, tClass))
end

on getOwnPlayerName me 
  tSession = getObject(#session)
  if (tSession = 0) then
    return FALSE
  end if
  return(tSession.GET(#user_name))
end

on eventProcMouseDown me, tEvent, tSprID, tParam, tWndID 
  tListService = me.getIGComponent("GameList")
  if (tListService = 0) then
    return FALSE
  end if
  tJoinedGameRef = tListService.getJoinedGame()
  tJoinedGameId = tListService.getJoinedGameId()
  tObservedGameId = tListService.getObservedGameId()
  if (tSprID = "join_game.button") then
    executeMessage(#sendTrackingPoint, "/game/joined/ui")
    return(tListService.joinTeamWithLeastMembers(tObservedGameId))
  else
    if (tSprID = "leave_game.button") then
      tListService.leaveJoinedGame(1)
      return(executeMessage(#show_ig, "GameList"))
    else
      if (tSprID = "ig_owngame_back.button") then
        return(me.ChangeWindowView("JoinedGame"))
      else
        if (tSprID = "ig_tab_highscores") then
          return(me.setViewMode(#highscore))
        else
          if tSprID <> "ig_level_name" then
            if (tSprID = "ig_tab_gameinfo") then
              return(me.setViewMode(#info))
            end if
            tComponent = me.getSubComponent("List", 0)
            if tComponent <> 0 then
              tComponent.eventProcMouseDown(tEvent, tSprID, tParam, tWndID)
            end if
            tComponent = me.getSubComponent("Details", 0)
            if tComponent <> 0 then
              tComponent.eventProcMouseDown(tEvent, tSprID, tParam, tWndID)
            end if
            return TRUE
          end if
        end if
      end if
    end if
  end if
end

on eventProcMouseHover me, tEvent, tSprID, tParam, tWndID 
  tComponent = me.getSubComponent("Details", 0)
  if tComponent <> 0 then
    return(call(#eventProcMouseHover, [tComponent], tEvent, tSprID, tParam, tWndID))
  end if
  return FALSE
end