EgtDOORCreator/Map.vb

Module Map

   Private m_refMainWindowVM As MainWindowVM
   Private m_refStatusBarVM As StatusBarVM
   Private m_refProjectManagerVM As ProjectManagerVM
   Private m_refProjectManagerHardwareVM As ProjectManagerHardwareVM
   Private m_refCompoPanelVM As CompoPanelVM
   Private m_refCompoPanelHardwareVM As CompoPanelVM
   Private m_refAssemblyManagerVM As AssemblyManagerVM
   Private m_refPartPageVM As PartPageVM
   Private m_refSceneManagerVM As SceneManagerVM

   Private m_refInstrumentPanelVM As InstrumentPanelVM
   Private m_refPopUpViewPanelVM As PopUpViewPanelVM
   Private m_refRefreshPanelVM As RefreshPanelVM
   Private m_refShowPanelVM As ShowPanelVM

   Private m_refDimensioningPanelVM As DimensioningPanelVM

   Private m_refAssemblyPageVM As AssemblyPageVM
   Private m_refHardwarePageVM As HardwarePageVM
   Private m_refOrderVM As OrderVM

   Private m_refPrintSceneHostV As PrintSceneHostV
   Private m_refHardwareHelpSceneHostV As HardwareHelpSceneHostV

   Private m_refOptionsVM As OptionsVM

   Private m_refSpecialPanelVM As SpecialPanelVM

#Region "Get"

   Public ReadOnly Property refMainWindowVM As MainWindowVM
      Get
         Return m_refMainWindowVM
      End Get
   End Property

   Public ReadOnly Property refStatusBarVM As StatusBarVM
      Get
         Return m_refStatusBarVM
      End Get
   End Property

   Public ReadOnly Property refProjectManagerVM As ProjectManagerVM
      Get
         Return m_refProjectManagerVM
      End Get
   End Property

   Public ReadOnly Property refProjectManagerHardwareVM As ProjectManagerHardwareVM
      Get
         Return m_refProjectManagerHardwareVM
      End Get
   End Property

   Public ReadOnly Property refCompoPanelVM As CompoPanelVM
      Get
         Return m_refCompoPanelVM
      End Get
   End Property

   Public ReadOnly Property refCompoPanelHardwareVM As CompoPanelVM
      Get
         Return m_refCompoPanelHardwareVM
      End Get
   End Property

   Public ReadOnly Property refAssemblyManagerVM As AssemblyManagerVM
      Get
         Return m_refAssemblyManagerVM
      End Get
   End Property

   Public ReadOnly Property refPartPageVM As PartPageVM
      Get
         Return m_refPartPageVM
      End Get
   End Property

   Public ReadOnly Property refSceneManagerVM As SceneManagerVM
      Get
         Return m_refSceneManagerVM
      End Get
   End Property

   Public ReadOnly Property refInstrumentPanelVM As InstrumentPanelVM
      Get
         Return m_refInstrumentPanelVM
      End Get
   End Property

   Public ReadOnly Property refPopUpViewPanelVM As PopUpViewPanelVM
      Get
         Return m_refPopUpViewPanelVM
      End Get
   End Property

   Public ReadOnly Property refRefreshPanelVM As RefreshPanelVM
      Get
         Return m_refRefreshPanelVM
      End Get
   End Property

   Public ReadOnly Property refShowPanelVM As ShowPanelVM
      Get
         Return m_refShowPanelVM
      End Get
   End Property

   Public ReadOnly Property refAssemblyPageVM As AssemblyPageVM
      Get
         Return m_refAssemblyPageVM
      End Get
   End Property

   Public ReadOnly Property refOrderVM As OrderVM
      Get
         Return m_refOrderVM
      End Get
   End Property

   Public ReadOnly Property refOptionsVM As OptionsVM
      Get
         Return m_refOptionsVM
      End Get
   End Property

   Public ReadOnly Property refHardwarePageVM As HardwarePageVM
      Get
         Return m_refHardwarePageVM
      End Get
   End Property

   Public ReadOnly Property refDimensioningPanelVM As DimensioningPanelVM
      Get
         Return m_refDimensioningPanelVM
      End Get
   End Property

   Public ReadOnly Property refPrintSceneHostV As PrintSceneHostV
      Get
         Return m_refPrintSceneHostV
      End Get
   End Property

   Public ReadOnly Property refHardwareHelpSceneHostV As HardwareHelpSceneHostV
      Get
         Return m_refHardwareHelpSceneHostV
      End Get
   End Property

   Public ReadOnly Property refSpecialPanelVM As SpecialPanelVM
      Get
         Return m_refSpecialPanelVM
      End Get
   End Property

#End Region    ' Get

#Region "Set"

   Friend Function SetRefMainWindowVM(MainWindowVM As MainWindowVM) As Boolean
      m_refMainWindowVM = MainWindowVM
      Return Not IsNothing(m_refMainWindowVM)
   End Function

   Friend Function SetRefStatusBarVM(StatusBarVM As StatusBarVM) As Boolean
      m_refStatusBarVM = StatusBarVM
      Return Not IsNothing(m_refStatusBarVM)
   End Function

   Friend Function SetRefProjectManagerVM(ProjectManagerVM As ProjectManagerVM) As Boolean
      m_refProjectManagerVM = ProjectManagerVM
      Return Not IsNothing(m_refProjectManagerVM)
   End Function

   Friend Function SetRefProjectManagerHardwareVM(ProjectManagerHardwareVM As ProjectManagerHardwareVM) As Boolean
      m_refProjectManagerHardwareVM = ProjectManagerHardwareVM
      Return Not IsNothing(m_refProjectManagerHardwareVM)
   End Function

   Friend Function SetRefCompoPanelVM(CompoPanelVM As CompoPanelVM) As Boolean
      m_refCompoPanelVM = CompoPanelVM
      Return Not IsNothing(m_refCompoPanelVM)
   End Function

   Friend Function SetRefCompoPaneHardwarelVM(CompoPanelHardwareVM As CompoPanelVM) As Boolean
      m_refCompoPanelHardwareVM = CompoPanelHardwareVM
      Return Not IsNothing(m_refCompoPanelHardwareVM)
   End Function

   Friend Function SetRefDoorManagerVM(DoorManagerVM As AssemblyManagerVM) As Boolean
      m_refAssemblyManagerVM = DoorManagerVM
      Return Not IsNothing(m_refAssemblyManagerVM)
   End Function

   Friend Function SetRefDoorParametersVM(DoorParametersVM As PartPageVM) As Boolean
      m_refPartPageVM = DoorParametersVM
      Return Not IsNothing(m_refPartPageVM)
   End Function

   Friend Function SetRefSceneManagerVM(SceneManagerVM As SceneManagerVM) As Boolean
      m_refSceneManagerVM = SceneManagerVM
      Return Not IsNothing(m_refSceneManagerVM)
   End Function

   Friend Function SetRefInstrumentPanelVM(InstrumentPanelVM As InstrumentPanelVM) As Boolean
      m_refInstrumentPanelVM = InstrumentPanelVM
      Return Not IsNothing(m_refInstrumentPanelVM)
   End Function

   Friend Function SetRefPopUpViewPanelVM(PopUpViewPanelVM As PopUpViewPanelVM) As Boolean
      m_refPopUpViewPanelVM = PopUpViewPanelVM
      Return Not IsNothing(m_refPopUpViewPanelVM)
   End Function

   Friend Function SetRefRefreshPanelVM(RefreshPanelVM As RefreshPanelVM) As Boolean
      m_refRefreshPanelVM = RefreshPanelVM
      Return Not IsNothing(m_refRefreshPanelVM)
   End Function

   Friend Function SetRefShowPanelVM(ShowPanelVM As ShowPanelVM) As Boolean
      m_refShowPanelVM = ShowPanelVM
      Return Not IsNothing(m_refShowPanelVM)
   End Function

   Friend Function SetRefJambPageVM(JambPageVM As AssemblyPageVM) As Boolean
      m_refAssemblyPageVM = JambPageVM
      Return Not IsNothing(m_refAssemblyPageVM)
   End Function

   Friend Function SetRefOrderVM(OrderVM As OrderVM) As Boolean
      m_refOrderVM = OrderVM
      Return Not IsNothing(m_refOrderVM)
   End Function

   Friend Function SetRefOptionsVM(OptionsVM As OptionsVM) As Boolean
      m_refOptionsVM = OptionsVM
      Return Not IsNothing(m_refOptionsVM)
   End Function

   Friend Function SetRefHardwarePageVM(HardwarePageVM As HardwarePageVM) As Boolean
      m_refHardwarePageVM = HardwarePageVM
      Return Not IsNothing(m_refHardwarePageVM)
   End Function

   Friend Function SetRefDimensioningPanelVM(DimensioningPanelVM As DimensioningPanelVM) As Boolean
      m_refDimensioningPanelVM = DimensioningPanelVM
      Return Not IsNothing(m_refDimensioningPanelVM)
   End Function

   Friend Function SetRefPrintSceneHostV(PrintSceneHostV As PrintSceneHostV) As Boolean
      m_refPrintSceneHostV = PrintSceneHostV
      Return Not IsNothing(m_refPrintSceneHostV)
   End Function

   Friend Function SetRefHardwareHelpSceneHostV(HardwareHelpSceneHostV As HardwareHelpSceneHostV) As Boolean
      m_refHardwareHelpSceneHostV = HardwareHelpSceneHostV
      Return Not IsNothing(m_refHardwareHelpSceneHostV)
   End Function

   Friend Function SetRefSpecialPanelVM(SpecialPanelVM As SpecialPanelVM) As Boolean
      m_refSpecialPanelVM = SpecialPanelVM
      Return Not IsNothing(m_refSpecialPanelVM)
   End Function

#End Region    ' Set

#Region "Init"

   Friend Function BeginInit(MainWindowVM As MainWindowVM) As Boolean
      m_refMainWindowVM = MainWindowVM
      Return Not IsNothing(m_refMainWindowVM)
   End Function

   Friend Function EndInit() As Boolean
      ' Verifico se tutti i pezzi necessari sono stati caricati
      Return Not IsNothing(m_refMainWindowVM) AndAlso Not IsNothing(m_refStatusBarVM) AndAlso
             Not IsNothing(m_refProjectManagerVM) AndAlso Not IsNothing(m_refCompoPanelVM) AndAlso
             Not IsNothing(m_refAssemblyManagerVM) AndAlso Not IsNothing(m_refPartPageVM) AndAlso
             Not IsNothing(m_refSceneManagerVM) AndAlso Not IsNothing(m_refOptionsVM)
   End Function

#End Region    ' Init

End Module