icarus/Icarus/Utility/Map.vb

Imports EgtWPFLib5

Module Map

   Private m_refMainWindowVM As MainWindowVM
   Private m_refMyStatusBarVM As MyStatusBarVM
   Private m_refProjManagerVM As ProjManagerVM
   Private m_refProjectVM As ProjectVM
   Private m_refSecondaryWindowVM As SecondaryWindowVM
   Private m_refSecondaryWindowV As SecondaryWindowV
   Private m_refMachinePanelVM As MachinePanelVM
   Private m_refLeftPanelVM As LeftPanelVM
   Private m_refRightPanelVM As RightPanelVM
   Private m_refDispositionPanelVM As DispositionPanelVM
   Private m_refStartMachPanelVM As StartMachPanelVM
   Private m_refRibPanelVM As RibPanelVM
   Private m_refControllerInputPanelVM As ControllerInputPanelVM
   Private m_refInstrumentPanelVM As InstrumentPanelVM
   Private m_refTopPanelVM As TopPanelVM
   Private m_refSliceManagerVM As SliceManagerVM
   Private m_refTFSEditorVM As TFSEditorVM
   Private m_refCurrMachiningPanelVM As CurrMachiningPanelVM
   Private m_refMachiningDbVM As MachiningDbVM
   Private m_refMaterialDbVM As MaterialDbVM
   Private m_refSliderManagerVM As SliderManagerVM
   Private m_refRibParamPanelVM As RibParamPanelVM
   Private m_refSimulationPanelVM As SimulationPanelVM
   Private m_refReferencePanelVM As ReferencePanelVM
   Private m_refViewLayerManagerVM As ViewLayerManagerVM
   Private m_refShellNumberPanelVM As ShellNumberPanelVM
   Private m_refShellNumberParamPanelVM As ShellNumberParamPanelVM
   Private m_refFilledSolidPanelVM As FilledSolidPanelVM
   Private m_refFilledSolidParamPanelVM As FilledSolidParamPanelVM
   Private m_refSplashScreen As SplashScreen
   Private m_refManagePartPanelVM As ManagePartPanelVM
   Private m_refMachineViewPanelVM As MachineViewPanelVM
   Private m_refImportLoadingWndVM As ImportLoadingWndVM

#Region "Get"

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

   Public ReadOnly Property refMyStatusBarVM As MyStatusBarVM
      Get
         Return LibMap.refStatusBarVM
      End Get
   End Property

   Public ReadOnly Property refProjManagerVM As ProjManagerVM
      Get
         Return m_refProjManagerVM
      End Get
   End Property

   Public ReadOnly Property refProjectVM As ProjectVM
      Get
         Return m_refProjectVM
      End Get
   End Property

   Public ReadOnly Property refSceneHostVM As MySceneHostVM
      Get
         Return LibMap.refSceneHostVM
      End Get
   End Property

   Public ReadOnly Property refSecondaryWindowVM As SecondaryWindowVM
      Get
         Return m_refSecondaryWindowVM
      End Get
   End Property
   Public ReadOnly Property refSecondaryWindowV As SecondaryWindowV
      Get
         Return m_refSecondaryWindowV
      End Get
   End Property

   Public ReadOnly Property refShowPanelVM As ShowPanelVM
      Get
         Return LibMap.refShowPanelVM
      End Get
   End Property

   Public ReadOnly Property refMachinePanelVM As MachinePanelVM
      Get
         Return m_refMachinePanelVM
      End Get
   End Property

   Public ReadOnly Property refLeftPanelVM As LeftPanelVM
      Get
         Return m_refLeftPanelVM
      End Get
   End Property

   Public ReadOnly Property refRightPanelVM As RightPanelVM
      Get
         Return m_refRightPanelVM
      End Get
   End Property

   Public ReadOnly Property refDispositionPanelVM As DispositionPanelVM
      Get
         Return m_refDispositionPanelVM
      End Get
   End Property

   Public ReadOnly Property refStartMachPanelVM As StartMachPanelVM
      Get
         Return m_refStartMachPanelVM
      End Get
   End Property

   Public ReadOnly Property refRibPanelVM As RibPanelVM
      Get
         Return m_refRibPanelVM
      End Get
   End Property

   Public ReadOnly Property refControllerInputPanelVM As ControllerInputPanelVM
      Get
         Return m_refControllerInputPanelVM
      End Get
   End Property

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

   Public ReadOnly Property refTopPanelVM As TopPanelVM
      Get
         Return m_refTopPanelVM
      End Get
   End Property

   Public ReadOnly Property refSliceManagerVM As SliceManagerVM
      Get
         Return m_refSliceManagerVM
      End Get
   End Property

   Public ReadOnly Property refTFSEditorVM As TFSEditorVM
      Get
         Return m_refTFSEditorVM
      End Get
   End Property

   Public ReadOnly Property refCurrMachiningPanelVM As CurrMachiningPanelVM
      Get
         Return m_refCurrMachiningPanelVM
      End Get
   End Property

   Public ReadOnly Property refMachiningDbVM As MachiningDbVM
      Get
         Return m_refMachiningDbVM
      End Get
   End Property

   Public ReadOnly Property refMaterialDbVM As MaterialDbVM
      Get
         Return m_refMaterialDbVM
      End Get
   End Property

   Public ReadOnly Property refSliderManagerVM As SliderManagerVM
      Get
         Return m_refSliderManagerVM
      End Get
   End Property

   Public ReadOnly Property refRibParamPanelVM As RibParamPanelVM
      Get
         Return m_refRibParamPanelVM
      End Get
   End Property

   Public ReadOnly Property refSimulationPanelVM As SimulationPanelVM
      Get
         Return m_refSimulationPanelVM
      End Get
   End Property

   Public ReadOnly Property refReferencePanelVM As ReferencePanelVM
      Get
         Return m_refReferencePanelVM
      End Get
   End Property

   Public ReadOnly Property refViewLayerManagerVM As ViewLayerManagerVM
      Get
         Return m_refViewLayerManagerVM
      End Get
   End Property

   Public ReadOnly Property refShellNumberPanelVM As ShellNumberPanelVM
      Get
         Return m_refShellNumberPanelVM
      End Get
   End Property

   Public ReadOnly Property refShellNumberParamPanelVM As ShellNumberParamPanelVM
      Get
         Return m_refShellNumberParamPanelVM
      End Get
   End Property

   Public ReadOnly Property refFilledSolidPanelVM As FilledSolidPanelVM
      Get
         Return m_refFilledSolidPanelVM
      End Get
   End Property

   Public ReadOnly Property refFilledSolidParamPanelVM As FilledSolidParamPanelVM
      Get
         Return m_refFilledSolidParamPanelVM
      End Get
   End Property

   Public ReadOnly Property refSplashScreen As SplashScreen
      Get
         Return m_refSplashScreen
      End Get
   End Property

   Public ReadOnly Property refManagePartPanelVM As ManagePartPanelVM
      Get
         Return m_refManagePartPanelVM
      End Get
   End Property

   Public ReadOnly Property refMachineViewPanelVM As MachineViewPanelVM
      Get
         Return m_refMachineViewPanelVM
      End Get
   End Property

   Public ReadOnly Property refImportLoadingWndVM As ImportLoadingWndVM
      Get
         Return m_refImportLoadingWndVM
      End Get
   End Property

#End Region    ' Get

#Region "Set"

   Friend Function SetRefMyStatusBarVM(MyStatusBarVM As MyStatusBarVM) As Boolean
      LibMap.SetRefStatusBarVM(MyStatusBarVM)
      Return Not IsNothing(LibMap.refStatusBarVM)
   End Function

   Friend Function SetRefProjManagerVM(ProjManagerVM As ProjManagerVM) As Boolean
      m_refProjManagerVM = ProjManagerVM
      Return Not IsNothing(m_refProjManagerVM)
   End Function

   Friend Function SetRefProjectVM(ProjectVM As ProjectVM) As Boolean
      m_refProjectVM = ProjectVM
      Return Not IsNothing(m_refProjectVM)
   End Function

   Friend Function SetRefSceneHostVM(SceneHostVM As SceneHostVM) As Boolean
      LibMap.SetRefSceneHostVM(SceneHostVM)
      Return Not IsNothing(LibMap.refSceneHostVM)
   End Function

   Friend Function SetRefSecondaryWindowVM(SecondaryWindowVM As SecondaryWindowVM) As Boolean
      m_refSecondaryWindowVM = SecondaryWindowVM
      Return Not IsNothing(m_refSecondaryWindowVM)
   End Function
   Friend Function SetRefSecondaryWindowV(SecondaryWindowV As SecondaryWindowV) As Boolean
      m_refSecondaryWindowV = SecondaryWindowV
      Return Not IsNothing(m_refSecondaryWindowV)
   End Function

   Friend Function SetRefMachinePanelVM(MachinePanelVM As MachinePanelVM) As Boolean
      m_refMachinePanelVM = MachinePanelVM
      Return Not IsNothing(m_refMachinePanelVM)
   End Function

   Friend Function SetRefLeftPanelVM(LeftPanelVM As LeftPanelVM) As Boolean
      m_refLeftPanelVM = LeftPanelVM
      Return Not IsNothing(m_refLeftPanelVM)
   End Function

   Friend Function SetRefRightPanelVM(RightPanelVM As RightPanelVM) As Boolean
      m_refRightPanelVM = RightPanelVM
      Return Not IsNothing(m_refRightPanelVM)
   End Function

   Friend Function SetRefDispositionPanelVM(DispositionPanelVM As DispositionPanelVM) As Boolean
      m_refDispositionPanelVM = DispositionPanelVM
      Return Not IsNothing(m_refDispositionPanelVM)
   End Function

   Friend Function SetRefStartMachPanelVM(StartMachPanelVM As StartMachPanelVM) As Boolean
      m_refStartMachPanelVM = StartMachPanelVM
      Return Not IsNothing(m_refStartMachPanelVM)
   End Function

   Friend Function SetRefRibPanelVM(RibPanelVM As RibPanelVM) As Boolean
      m_refRibPanelVM = RibPanelVM
      Return Not IsNothing(m_refRibPanelVM)
   End Function

   Friend Function SetRefControllerInputPanelVM(ControllerInputPanelVM As ControllerInputPanelVM) As Boolean
      m_refControllerInputPanelVM = ControllerInputPanelVM
      Return Not IsNothing(m_refControllerInputPanelVM)
   End Function

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

   Friend Function SetRefTopPanelVM(TopPanelVM As TopPanelVM) As Boolean
      m_refTopPanelVM = TopPanelVM
      Return Not IsNothing(m_refTopPanelVM)
   End Function

   Friend Function SetRefSliceManagerVM(SliceManagerVM As SliceManagerVM) As Boolean
      m_refSliceManagerVM = SliceManagerVM
      Return Not IsNothing(m_refSliceManagerVM)
   End Function

   Friend Function SetRefTFSEditorVM(TFSEditorVM As TFSEditorVM) As Boolean
      m_refTFSEditorVM = TFSEditorVM
      Return Not IsNothing(m_refTFSEditorVM)
   End Function

   Friend Function SetRefCurrMachiningPanelVM(CurrMachiningPanelVM As CurrMachiningPanelVM) As Boolean
      m_refCurrMachiningPanelVM = CurrMachiningPanelVM
      Return Not IsNothing(m_refCurrMachiningPanelVM)
   End Function

   Friend Function SetRefMachiningDbVM(MachiningDbVM As MachiningDbVM) As Boolean
      m_refMachiningDbVM = MachiningDbVM
      Return Not IsNothing(m_refMachiningDbVM)
   End Function

   Friend Function SetRefMaterialDbVM(MaterialDbVM As MaterialDbVM) As Boolean
      m_refMaterialDbVM = MaterialDbVM
      Return Not IsNothing(m_refMaterialDbVM)
   End Function

   Friend Function SetRefSliderManagerVM(SliderManagerVM As SliderManagerVM) As Boolean
      m_refSliderManagerVM = SliderManagerVM
      Return Not IsNothing(m_refSliderManagerVM)
   End Function

   Friend Function SetRefRibParamPanelVM(RibParamPanelVM As RibParamPanelVM) As Boolean
      m_refRibParamPanelVM = RibParamPanelVM
      Return Not IsNothing(m_refRibParamPanelVM)
   End Function

   Friend Function SetRefSimulationPanelVM(SimulationPanelVM As SimulationPanelVM) As Boolean
      m_refSimulationPanelVM = SimulationPanelVM
      Return Not IsNothing(m_refSimulationPanelVM)
   End Function

   Friend Function SetRefReferencePanelVM(ReferencePanelVM As ReferencePanelVM) As Boolean
      m_refReferencePanelVM = ReferencePanelVM
      Return Not IsNothing(m_refReferencePanelVM)
   End Function

   Friend Function SetRefViewLayerManagerVM(ViewLayerManagerVM As ViewLayerManagerVM) As Boolean
      m_refViewLayerManagerVM = ViewLayerManagerVM
      Return Not IsNothing(m_refViewLayerManagerVM)
   End Function

   Friend Function SetRefShellNumberPanelVM(ShellNumberPanelVM As ShellNumberPanelVM) As Boolean
      m_refShellNumberPanelVM = ShellNumberPanelVM
      Return Not IsNothing(m_refShellNumberPanelVM)
   End Function

   Friend Function SetRefShellNumberParamPanelVM(ShellNumberParamPanelVM As ShellNumberParamPanelVM) As Boolean
      m_refShellNumberParamPanelVM = ShellNumberParamPanelVM
      Return Not IsNothing(m_refShellNumberParamPanelVM)
   End Function

   Friend Function SetRefFilledSolidPanelVM(FilledSolidPanelVM As FilledSolidPanelVM) As Boolean
      m_refFilledSolidPanelVM = FilledSolidPanelVM
      Return Not IsNothing(m_refFilledSolidPanelVM)
   End Function

   Friend Function SetRefFilledSolidParamPanelVM(FilledSolidParamPanelVM As FilledSolidParamPanelVM) As Boolean
      m_refFilledSolidParamPanelVM = FilledSolidParamPanelVM
      Return Not IsNothing(m_refFilledSolidParamPanelVM)
   End Function

   Friend Function SetRefSplashScreen(SplashScreen As SplashScreen) As Boolean
      m_refSplashScreen = SplashScreen
      Return Not IsNothing(m_refSplashScreen)
   End Function

   Friend Function SetRefManagePartPanelVM(ManagePartPanelVM As ManagePartPanelVM) As Boolean
      m_refManagePartPanelVM = ManagePartPanelVM
      Return Not IsNothing(m_refManagePartPanelVM)
   End Function

   Friend Function SetRefMachineViewPanelVM(MachineViewPanelVM As MachineViewPanelVM) As Boolean
      m_refMachineViewPanelVM = MachineViewPanelVM
      Return Not IsNothing(m_refMachineViewPanelVM)
   End Function

   Friend Function SetRefImportLoadingWndVM(ImportLoadingWndVM As ImportLoadingWndVM) As Boolean
      m_refImportLoadingWndVM = ImportLoadingWndVM
      Return Not IsNothing(m_refImportLoadingWndVM)
   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_refProjectVM) AndAlso
      '       Not IsNothing(LibMap.refStatusBarVM) AndAlso Not IsNothing(m_refProjectManagerVM) AndAlso
      '       Not IsNothing(LibMap.refSceneHostVM) AndAlso Not IsNothing(LibMap.refShowPanelVM) AndAlso
      '       Not IsNothing(m_refVeinMatchPanelVM) AndAlso
      '       Not IsNothing(m_refOptionPanelVM) AndAlso Not IsNothing(m_refRawPartTabVM) AndAlso
      '       Not IsNothing(m_refNestingTabVM) AndAlso Not IsNothing(m_refSimulTabVM) AndAlso
      '       Not IsNothing(m_refMachiningTabVM) AndAlso
      '       LibMap.EndInit()
      Return Not IsNothing(m_refMainWindowVM) AndAlso
             Not IsNothing(LibMap.refStatusBarVM) AndAlso
             LibMap.EndInit()
   End Function

#End Region    ' Init

End Module