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