Emmanuele Sassi
474 lines
16 KiB
VB.net
474 lines
16 KiB
VB.net
Imports Effector.Plugin.Interface
|
|
|
|
Module Map
|
|
|
|
Private m_refFiveLakesUIVM As FiveLakesUIVM
|
|
Private m_refDoorListPageVM As DoorListPageVM
|
|
Private m_refMachinePageVM As MachinePageVM
|
|
Private m_refSupervisorFunction As IHost
|
|
|
|
'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 refFiveLakesUIVM As FiveLakesUIVM
|
|
Get
|
|
Return m_refFiveLakesUIVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refDoorListPageVM As DoorListPageVM
|
|
Get
|
|
Return m_refDoorListPageVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refMachinePageVM As MachinePageVM
|
|
Get
|
|
Return m_refMachinePageVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refSupervisorFunction As IHost
|
|
Get
|
|
Return m_refSupervisorFunction
|
|
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 SetRefSupervisorFunction(IHost As IHost) As Boolean
|
|
m_refSupervisorFunction = IHost
|
|
Return Not IsNothing(m_refSupervisorFunction)
|
|
End Function
|
|
|
|
Friend Function SetRefDoorListPageVM(DoorListPageVM As DoorListPageVM) As Boolean
|
|
m_refDoorListPageVM = DoorListPageVM
|
|
Return Not IsNothing(m_refDoorListPageVM)
|
|
End Function
|
|
|
|
Friend Function SetRefMachinePageVM(MachinePageVM As MachinePageVM) As Boolean
|
|
m_refMachinePageVM = MachinePageVM
|
|
Return Not IsNothing(m_refMachinePageVM)
|
|
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(FiveLakesUIVM As FiveLakesUIVM) As Boolean
|
|
m_refFiveLakesUIVM = FiveLakesUIVM
|
|
Return Not IsNothing(m_refFiveLakesUIVM)
|
|
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_refFiveLakesUIVM)
|
|
End Function
|
|
|
|
#End Region ' Init
|
|
|
|
End Module
|