Imports EgtWPFLib5 Module Map #Region "Program ViewModel Map" Private m_refMainWindowVM As MainWindowVM 'Private m_refStatusBarVM As StatusBarVM Private m_refTopCommandBarVM As TopCommandBarVM Private m_refProjectVM As ProjectVM Private m_refFixtureParametersVM As FixtureParametersVM Private m_refRawPartOptionVM As RawPartOptionVM Private m_refSimulationExpanderVM As SimulationExpanderVM Private m_refMachinePanelVM As MyMachinePanelVM Private m_refOptionPanelVM As OptionPanelVM Private m_refDrawOptionPanelVM As DrawOptionPanelVM Private m_refMachiningOptionPanelVM As MachiningOptionPanelVM Private m_refEstimationsExpanderVM As EstimationsExpanderVM Private m_refOperationsListExpanderVM As OperationsListExpanderVM Private m_refOperationParametersExpanderVM As OperationParametersExpanderVM Private m_refMachiningTreeExpanderVM As MachiningTreeExpanderVM 'Private m_refMachGroupPanelVM As MachGroupPanelVM Private m_refInstrumentPanelVM As InstrumentPanelVM Private m_refManageLayerExpanderVM As ManageLayerExpanderVM Private m_refInputExpanderVM As InputExpanderVM Private m_refShowPanelVM As ShowPanelVM Private m_refInfoExpanderVM As InfoExpanderVM Private m_refDrawPanelVM As DrawPanelVM Private m_refProjectV As ProjectV Private m_refDoorPanelVM As DoorPanelVM Private m_refSpecialPanelVM As SpecialPanelVM Private m_refExecutePanelVM As ExecutePanelVM Private m_refBeamPanelVM As BeamPanelVM Private m_refWallPanelVM As WallPanelVM Private m_refBeamWallPanelVM As BeamWallPanelVM Private m_refGunStockPanelVM As GunStockPanelVM #Region "Get" Public ReadOnly Property refMainWindowVM As MainWindowVM Get Return m_refMainWindowVM End Get End Property Public ReadOnly Property refStatusBarVM As MyStatusBarVM Get Return DirectCast(LibMap.refStatusBarVM, MyStatusBarVM) End Get End Property Public ReadOnly Property refTopCommandBarVM As TopCommandBarVM Get Return m_refTopCommandBarVM End Get End Property Public ReadOnly Property refProjectVM As ProjectVM Get Return m_refProjectVM End Get End Property Public ReadOnly Property refFixtureParametersVM As FixtureParametersVM Get Return m_refFixtureParametersVM End Get End Property Public ReadOnly Property refRawPartOptionVM As RawPartOptionVM Get Return m_refRawPartOptionVM End Get End Property Public ReadOnly Property refSimulationExpanderVM As SimulationExpanderVM Get Return m_refSimulationExpanderVM End Get End Property Public ReadOnly Property refMachinePanelVM As MyMachinePanelVM Get Return m_refMachinePanelVM End Get End Property Public ReadOnly Property refOptionPanelVM As OptionPanelVM Get Return m_refOptionPanelVM End Get End Property Public ReadOnly Property refDrawOptionPanelVM As DrawOptionPanelVM Get Return m_refDrawOptionPanelVM End Get End Property Public ReadOnly Property refMachiningOptionPanelVM As MachiningOptionPanelVM Get Return m_refMachiningOptionPanelVM End Get End Property Public ReadOnly Property refEstimationsExpanderVM As EstimationsExpanderVM Get Return m_refEstimationsExpanderVM End Get End Property Public ReadOnly Property refOperationsListExpanderVM As OperationsListExpanderVM Get Return m_refOperationsListExpanderVM End Get End Property Public ReadOnly Property refOperationParametersExpanderVM As OperationParametersExpanderVM Get Return m_refOperationParametersExpanderVM End Get End Property Public ReadOnly Property refMachiningTreeExpanderVM As MachiningTreeExpanderVM Get Return m_refMachiningTreeExpanderVM End Get End Property Public ReadOnly Property refMachGroupPanelVM As MyMachGroupPanelVM Get Return DirectCast( LibMap.refMachGroupPanelVM, MyMachGroupPanelVM) End Get End Property Public ReadOnly Property refInstrumentPanelVM As InstrumentPanelVM Get Return m_refInstrumentPanelVM End Get End Property Public ReadOnly Property refManageLayerExpanderVM As ManageLayerExpanderVM Get Return m_refManageLayerExpanderVM End Get End Property Public ReadOnly Property refInputExpanderVM As InputExpanderVM Get Return m_refInputExpanderVM End Get End Property Public ReadOnly Property refShowPanelVM As ShowPanelVM Get Return m_refShowPanelVM End Get End Property Public ReadOnly Property refInfoExpanderVM As InfoExpanderVM Get Return m_refInfoExpanderVM End Get End Property Public ReadOnly Property refDrawPanelVM As DrawPanelVM Get Return m_refDrawPanelVM End Get End Property Public ReadOnly Property refProjectV As ProjectV Get Return m_refProjectV End Get End Property Public ReadOnly Property refDoorPanelVM As DoorPanelVM Get Return m_refDoorPanelVM End Get End Property Public ReadOnly Property refSpecialPanelVM As SpecialPanelVM Get Return m_refSpecialPanelVM End Get End Property Public ReadOnly Property refExecutePanelVM As ExecutePanelVM Get Return m_refExecutePanelVM End Get End Property Public ReadOnly Property refBeamPanelVM As BeamPanelVM Get Return m_refBeamPanelVM End Get End Property Public ReadOnly Property refWallPanelVM As WallPanelVM Get Return m_refWallPanelVM End Get End Property Public ReadOnly Property refBeamWallPanelVM As BeamWallPanelVM Get Return m_refBeamWallPanelVM End Get End Property Public ReadOnly Property refGunStockPanelVM As GunStockPanelVM Get Return m_refGunStockPanelVM End Get End Property #End Region ' Get #Region "Set" Friend Function SetRefStatusBarVM(StatusBarVM As MyStatusBarVM) As Boolean LibMap.SetRefStatusBarVM(StatusBarVM) Return Not IsNothing(LibMap.refStatusBarVM) End Function Friend Function SetRefTopCommandBarVM(TopCommandBarVM As TopCommandBarVM) As Boolean m_refTopCommandBarVM = TopCommandBarVM Return Not IsNothing(m_refTopCommandBarVM) End Function Friend Function SetRefProjectVM(ProjectVM As ProjectVM) As Boolean m_refProjectVM = ProjectVM Return Not IsNothing(m_refProjectVM) End Function Friend Function SetRefFixtureParametersVM(FixtureParametersVM As FixtureParametersVM) As Boolean m_refFixtureParametersVM = FixtureParametersVM Return Not IsNothing(m_refFixtureParametersVM) End Function Friend Function SetRefRawPartOptionVM(RawPartOptionVM As RawPartOptionVM) As Boolean m_refRawPartOptionVM = RawPartOptionVM Return Not IsNothing(m_refRawPartOptionVM) End Function Friend Function SetRefSimulationExpanderVM(SimulationExpanderVM As SimulationExpanderVM) As Boolean m_refSimulationExpanderVM = SimulationExpanderVM Return Not IsNothing(m_refSimulationExpanderVM) End Function Friend Function SetRefMachinePanelVM(MachinePanelVM As MyMachinePanelVM) As Boolean m_refMachinePanelVM = MachinePanelVM Return Not IsNothing(m_refMachinePanelVM) End Function Friend Function SetRefOptionPanelVM(OptionPanelVM As OptionPanelVM) As Boolean m_refOptionPanelVM = OptionPanelVM Return Not IsNothing(m_refOptionPanelVM) End Function Friend Function SetRefDrawOptionPanelVM(DrawOptionPanelVM As DrawOptionPanelVM) As Boolean m_refDrawOptionPanelVM = DrawOptionPanelVM Return Not IsNothing(m_refDrawOptionPanelVM) End Function Friend Function SetRefMachiningOptionPanelVM(MachiningOptionPanelVM As MachiningOptionPanelVM) As Boolean m_refMachiningOptionPanelVM = MachiningOptionPanelVM Return Not IsNothing(m_refMachiningOptionPanelVM) End Function Friend Function SetRefEstimationsExpanderVM(EstimationsExpanderVM As EstimationsExpanderVM) As Boolean m_refEstimationsExpanderVM = EstimationsExpanderVM Return Not IsNothing(m_refEstimationsExpanderVM) End Function Friend Function SetRefOperationsListExpanderVM(OperationsListExpanderVM As OperationsListExpanderVM) As Boolean m_refOperationsListExpanderVM = OperationsListExpanderVM Return Not IsNothing(m_refOperationsListExpanderVM) End Function Friend Function SetRefOperationParametersExpanderVM(OperationParametersExpanderVM As OperationParametersExpanderVM) As Boolean m_refOperationParametersExpanderVM = OperationParametersExpanderVM Return Not IsNothing(m_refOperationParametersExpanderVM) End Function Friend Function SetRefMachiningTreeExpanderVM(MachiningTreeExpanderVM As MachiningTreeExpanderVM) As Boolean m_refMachiningTreeExpanderVM = MachiningTreeExpanderVM Return Not IsNothing(m_refMachiningTreeExpanderVM) End Function Friend Function SetRefMachGroupPanelVM(MachGroupPanelVM As MyMachGroupPanelVM) As Boolean LibMap.SetRefMachGroupPanelVM(MachGroupPanelVM) Return Not IsNothing(LibMap.refMachGroupPanelVM) End Function Friend Function SetRefInstrumentPanelVM(InstrumentPanelVM As InstrumentPanelVM) As Boolean m_refInstrumentPanelVM = InstrumentPanelVM Return Not IsNothing(m_refInstrumentPanelVM) End Function Friend Function SetRefManageLayerExpanderVM(ManageLayerExpanderVM As ManageLayerExpanderVM) As Boolean m_refManageLayerExpanderVM = ManageLayerExpanderVM Return Not IsNothing(m_refManageLayerExpanderVM) End Function Friend Function SetRefInputExpanderVM(InputExpanderVM As InputExpanderVM) As Boolean m_refInputExpanderVM = InputExpanderVM Return Not IsNothing(m_refInputExpanderVM) End Function Friend Function SetRefShowPanelVM(ShowPanelVM As ShowPanelVM) As Boolean m_refShowPanelVM = ShowPanelVM Return Not IsNothing(m_refShowPanelVM) End Function Friend Function SetRefInfoExpanderVM(InfoExpanderVM As InfoExpanderVM) As Boolean m_refInfoExpanderVM = InfoExpanderVM Return Not IsNothing(m_refInfoExpanderVM) End Function Friend Function SetRefDrawPanelVM(DrawPanelVM As DrawPanelVM) As Boolean m_refDrawPanelVM = DrawPanelVM Return Not IsNothing(m_refDrawPanelVM) End Function Friend Function SetRefProjectV(ProjectV As ProjectV) As Boolean m_refProjectV = ProjectV Return Not IsNothing(m_refProjectV) End Function Friend Function SetRefDoorPanelVM(DoorPanelVM As DoorPanelVM) As Boolean m_refDoorPanelVM = DoorPanelVM Return Not IsNothing(m_refDoorPanelVM) End Function Friend Function SetRefSpecialPanelVM(SpecialPanelVM As SpecialPanelVM) As Boolean m_refSpecialPanelVM = SpecialPanelVM Return Not IsNothing(m_refSpecialPanelVM) End Function Friend Function SetRefExecutePanelVM(ExecutePanelVM As ExecutePanelVM) As Boolean m_refExecutePanelVM = ExecutePanelVM Return Not IsNothing(m_refExecutePanelVM) End Function Friend Function SetRefBeamPanelVM(BeamPanelVM As BeamPanelVM) As Boolean m_refBeamPanelVM = BeamPanelVM Return Not IsNothing(m_refBeamPanelVM) End Function Friend Function SetRefWallPanelVM(WallPanelVM As WallPanelVM) As Boolean m_refWallPanelVM = WallPanelVM Return Not IsNothing(m_refWallPanelVM) End Function Friend Function SetRefBeamWallPanelVM(BeamWallPanelVM As BeamWallPanelVM) As Boolean m_refBeamWallPanelVM = BeamWallPanelVM Return Not IsNothing(m_refBeamWallPanelVM) End Function Friend Function SetRefGunStockPanelVM(GunStockPanelVM As GunStockPanelVM) As Boolean m_refGunStockPanelVM = GunStockPanelVM Return Not IsNothing(m_refGunStockPanelVM) 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(LibMap.refStatusBarVM) AndAlso Not IsNothing(m_refProjectVM) AndAlso Not IsNothing(m_refTopCommandBarVM) AndAlso Not IsNothing(m_refFixtureParametersVM) AndAlso Not IsNothing(m_refSimulationExpanderVM) AndAlso Not IsNothing(m_refMachinePanelVM) AndAlso Not IsNothing(m_refOptionPanelVM) AndAlso Not IsNothing(m_refDrawOptionPanelVM) AndAlso Not IsNothing(m_refMachiningOptionPanelVM) AndAlso Not IsNothing(m_refEstimationsExpanderVM) AndAlso Not IsNothing(m_refOperationsListExpanderVM) AndAlso Not IsNothing(m_refOperationParametersExpanderVM) AndAlso Not IsNothing(m_refMachiningTreeExpanderVM) AndAlso Not IsNothing(LibMap.refMachGroupPanelVM) AndAlso Not IsNothing(m_refInstrumentPanelVM) AndAlso Not IsNothing(m_refManageLayerExpanderVM) AndAlso Not IsNothing(m_refInputExpanderVM) AndAlso Not IsNothing(m_refShowPanelVM) AndAlso Not IsNothing(m_refInfoExpanderVM) AndAlso Not IsNothing(m_refDrawPanelVM) AndAlso Not IsNothing(m_refProjectV) AndAlso Not IsNothing(m_refDoorPanelVM) AndAlso Not IsNothing(m_refSpecialPanelVM) End Function #End Region ' Init #End Region ' Program ViewModel Map End Module