Demetrio Cassarino
e13aceda26
-modifica letttura parametri generali in btl info e pezzo -sistemato pulsante auto warehouse
494 lines
17 KiB
VB.net
494 lines
17 KiB
VB.net
Imports EgtWPFLib5
|
|
Imports EgtBEAMWALL.Core
|
|
|
|
Module Map
|
|
|
|
Private m_refMainWindowVM As MainWindowVM
|
|
Private m_refProjectVM As ProjectVM
|
|
Private m_refMainMenuVM As MainMenuVM
|
|
Private m_refLeftPanelVM As LeftPanelVM
|
|
Private m_refShowBeamPanelVM As ShowBeamPanelVM
|
|
Private m_refConfigurationPageVM As ConfigurationPageVM
|
|
Private m_refRawPartListVM As RawPartListVM
|
|
Private m_refWarehouseWndVM As WarehouseWndVM
|
|
Private m_refFreeContourManagerVM As FreeContourManagerVM
|
|
Private m_refFreeContourInputVM As FreeContourInputVM
|
|
Private m_refPartManagerVM As PartManagerVM
|
|
Private m_refInstrumentPanelVM As InstrumentPanelVM
|
|
Private m_refOptimizePanelVM As OptimizePanelVM
|
|
Private m_refCALCPanelVM As CALCPanelVM
|
|
Private m_refPartListVM As BTLPartListVM
|
|
Private m_refFeatureInPartInRawPartListVM As FeatureInPartInRawPartListVM
|
|
Private m_refStatisticsVM As StatisticsVM
|
|
Private m_refPParameterListVM As PParameterListVM
|
|
Private m_refFeatureManagerVM As FeatureManagerVM
|
|
'Private m_refAddSectionXMaterialWndVM As AddSectionXMaterialWndVM
|
|
Private m_refStatisticsTimePanelVM As StatisticsTimePanelVM
|
|
Private m_refPDFEditorVM As PDFEditorVM
|
|
Private m_refProdManagerVM As ProdManagerVM
|
|
Private m_refBTLPartManagerVM As BTLPartManagerVM
|
|
Private m_refRawPartManagerVM As RawPartManagerVM
|
|
Private m_refFeatureListManagerVM As FeatureListManagerVM
|
|
Private m_refSpecialPanelVM As SpecialPanelVM
|
|
Private m_refStrategyManagerVM As StrategyManagerVM
|
|
Private m_refForcedStrategyPanelVM As ForcedStrategyPanelVM
|
|
Private m_refGeneralParametersStrategyVM As GeneralParametersStrategyVM
|
|
Private m_refSceneShowBuldingVM As SceneShowBuldingVM
|
|
Private m_refSceneBuildingVM As SceneBuildingVM
|
|
Private m_refMyMachine As MyMachine
|
|
Private m_refBTLDataWndVM As BTLDataWndVM
|
|
|
|
#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 refProjectVM As ProjectVM
|
|
Get
|
|
Return m_refProjectVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refSceneHostVM As SceneHostVM
|
|
Get
|
|
Return LibMap.refSceneHostVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refShowPanelVM As ShowPanelVM
|
|
Get
|
|
Return LibMap.refShowPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refMainMenuVM As MainMenuVM
|
|
Get
|
|
Return m_refMainMenuVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refMachinePanelVM As MachinePanelVM
|
|
Get
|
|
Return CoreMap.refMachinePanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refLeftPanelVM As LeftPanelVM
|
|
Get
|
|
Return m_refLeftPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refMachGroupPanelVM As MyMachGroupPanelVM
|
|
Get
|
|
Return CoreMap.refMachGroupPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refShowBeamPanelVM As ShowBeamPanelVM
|
|
Get
|
|
Return m_refShowBeamPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refConfigurationPageVM As ConfigurationPageVM
|
|
Get
|
|
Return m_refConfigurationPageVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refRawPartListVM As RawPartListVM
|
|
Get
|
|
Return m_refRawPartListVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refWarehouseWndVM As WarehouseWndVM
|
|
Get
|
|
Return m_refWarehouseWndVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refFreeContourManagerVM As FreeContourManagerVM
|
|
Get
|
|
Return m_refFreeContourManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refFreeContourInputVM As FreeContourInputVM
|
|
Get
|
|
Return m_refFreeContourInputVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refPartManagerVM As PartManagerVM
|
|
Get
|
|
Return m_refPartManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refInstrumentPanelVM As MyInstrumentPanelVM
|
|
Get
|
|
Return m_refInstrumentPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refOptimizePanelVM As OptimizePanelVM
|
|
Get
|
|
Return m_refOptimizePanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refCALCPanelVM As CALCPanelVM
|
|
Get
|
|
Return m_refCALCPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refPartListVM As BTLPartListVM
|
|
Get
|
|
Return m_refPartListVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refFeatureInPartInRawPartListVM As FeatureInPartInRawPartListVM
|
|
Get
|
|
Return m_refFeatureInPartInRawPartListVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refStatisticsVM As StatisticsVM
|
|
Get
|
|
Return m_refStatisticsVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refPParameterListVM As PParameterListVM
|
|
Get
|
|
Return m_refPParameterListVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refFeatureManagerVM As FeatureManagerVM
|
|
Get
|
|
Return m_refFeatureManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refStatisticsTimePanelVM As StatisticsTimePanelVM
|
|
Get
|
|
Return m_refStatisticsTimePanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refPDFEditorVM As PDFEditorVM
|
|
Get
|
|
Return m_refPDFEditorVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refProdManagerVM As ProdManagerVM
|
|
Get
|
|
Return m_refProdManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refBTLPartManagerVM As BTLPartManagerVM
|
|
Get
|
|
Return m_refBTLPartManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refRawPartManagerVM As RawPartManagerVM
|
|
Get
|
|
Return m_refRawPartManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refFeatureListManagerVM As FeatureListManagerVM
|
|
Get
|
|
Return m_refFeatureListManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refSpecialPanelVM As SpecialPanelVM
|
|
Get
|
|
Return m_refSpecialPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refStrategyManagerVM As StrategyManagerVM
|
|
Get
|
|
Return m_refStrategyManagerVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refForcedStrategyPanelVM As ForcedStrategyPanelVM
|
|
Get
|
|
Return m_refForcedStrategyPanelVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refGeneralParametersStrategyVM As GeneralParametersStrategyVM
|
|
Get
|
|
Return m_refGeneralParametersStrategyVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refSceneShowBuldingVM As SceneShowBuldingVM
|
|
Get
|
|
Return m_refSceneShowBuldingVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refSceneBuildingVM As SceneBuildingVM
|
|
Get
|
|
Return m_refSceneBuildingVM
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refMyMachine As MyMachine
|
|
Get
|
|
Return m_refMyMachine
|
|
End Get
|
|
End Property
|
|
|
|
Public ReadOnly Property refBTLDataWndVM As BTLDataWndVM
|
|
Get
|
|
Return m_refBTLDataWndVM
|
|
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 SetRefProjectVM(ProjectVM As ProjectVM) As Boolean
|
|
m_refProjectVM = ProjectVM
|
|
Return Not IsNothing(m_refProjectVM)
|
|
End Function
|
|
|
|
Friend Function SetRefMainMenuVM(MainMenuVM As MainMenuVM) As Boolean
|
|
m_refMainMenuVM = MainMenuVM
|
|
Return Not IsNothing(m_refMainMenuVM)
|
|
End Function
|
|
|
|
Friend Function SetRefSceneHostVM(SceneHostVM As SceneHostVM) As Boolean
|
|
LibMap.SetRefSceneHostVM(SceneHostVM)
|
|
Return Not IsNothing(LibMap.refSceneHostVM)
|
|
End Function
|
|
|
|
Friend Function SetRefShowPanelVM(ShowPanelVM As ShowPanelVM) As Boolean
|
|
LibMap.SetRefShowPanelVM(ShowPanelVM)
|
|
Return Not IsNothing(LibMap.refShowPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefMachinePanelVM(MachinePanelVM As MachinePanelVM) As Boolean
|
|
CoreMap.SetRefMachinePanelVM(MachinePanelVM)
|
|
Return Not IsNothing(CoreMap.refMachinePanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefLeftPanelVM(LeftPanelVM As LeftPanelVM) As Boolean
|
|
m_refLeftPanelVM = LeftPanelVM
|
|
Return Not IsNothing(m_refLeftPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefMachGroupPanelVM(MachGroupPanelVM As MyMachGroupPanelVM) As Boolean
|
|
CoreMap.SetRefMachGroupPanelVM(MachGroupPanelVM)
|
|
Return Not IsNothing(CoreMap.refMachGroupPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefShowBeamPanelVM(ShowBeamPanelVM As ShowBeamPanelVM) As Boolean
|
|
m_refShowBeamPanelVM = ShowBeamPanelVM
|
|
Return Not IsNothing(m_refShowBeamPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefConfigurationPageVM(ConfigurationPageVM As ConfigurationPageVM) As Boolean
|
|
m_refConfigurationPageVM = ConfigurationPageVM
|
|
Return Not IsNothing(m_refConfigurationPageVM)
|
|
End Function
|
|
|
|
Friend Function SetRefRawPartListVM(RawPartListVM As RawPartListVM) As Boolean
|
|
m_refRawPartListVM = RawPartListVM
|
|
Return Not IsNothing(m_refRawPartListVM)
|
|
End Function
|
|
|
|
Friend Function SetRefWarehouseWndVM(WarehouseWndVM As WarehouseWndVM) As Boolean
|
|
m_refWarehouseWndVM = WarehouseWndVM
|
|
Return Not IsNothing(m_refWarehouseWndVM)
|
|
End Function
|
|
|
|
Friend Function SetRefFreeContourManagerVM(FreeContourManagerVM As FreeContourManagerVM) As Boolean
|
|
m_refFreeContourManagerVM = FreeContourManagerVM
|
|
Return Not IsNothing(m_refFreeContourManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefFreeContourInputVM(FreeContourInputVM As FreeContourInputVM) As Boolean
|
|
m_refFreeContourInputVM = FreeContourInputVM
|
|
Return Not IsNothing(m_refFreeContourInputVM)
|
|
End Function
|
|
|
|
Friend Function SetRefPartManagerVM(PartManagerVM As PartManagerVM) As Boolean
|
|
m_refPartManagerVM = PartManagerVM
|
|
Return Not IsNothing(m_refPartManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefInstrumentPanelVM(InstrumentPanelVM As InstrumentPanelVM) As Boolean
|
|
m_refInstrumentPanelVM = InstrumentPanelVM
|
|
Return Not IsNothing(m_refInstrumentPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefOptimizePanelVM(OptimizePanelVM As OptimizePanelVM) As Boolean
|
|
m_refOptimizePanelVM = OptimizePanelVM
|
|
Return Not IsNothing(m_refOptimizePanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefCALCPanelVM(CALCPanelVM As CALCPanelVM) As Boolean
|
|
m_refCALCPanelVM = CALCPanelVM
|
|
Return Not IsNothing(m_refCALCPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefPartListVM(PartListVM As BTLPartListVM) As Boolean
|
|
m_refPartListVM = PartListVM
|
|
Return Not IsNothing(m_refPartListVM)
|
|
End Function
|
|
|
|
Friend Function SetRefFeatureInPartInRawPartListVM(FeatureInPartInRawPartListVM As FeatureInPartInRawPartListVM) As Boolean
|
|
m_refFeatureInPartInRawPartListVM = FeatureInPartInRawPartListVM
|
|
Return Not IsNothing(m_refFeatureInPartInRawPartListVM)
|
|
End Function
|
|
|
|
Friend Function SetRefStatisticsVM(StatisticsVM As StatisticsVM) As Boolean
|
|
m_refStatisticsVM = StatisticsVM
|
|
Return Not IsNothing(m_refStatisticsVM)
|
|
End Function
|
|
|
|
Friend Function SetRefPParameterListVM(PParameterListVM As PParameterListVM) As Boolean
|
|
m_refPParameterListVM = PParameterListVM
|
|
Return Not IsNothing(m_refPParameterListVM)
|
|
End Function
|
|
|
|
Friend Function SetRefFeatureManagerVM(FeatureManagerVM As FeatureManagerVM) As Boolean
|
|
m_refFeatureManagerVM = FeatureManagerVM
|
|
Return Not IsNothing(m_refFeatureManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefStatisticsTimePanelVM(StatisticsTimePanelVM As StatisticsTimePanelVM) As Boolean
|
|
m_refStatisticsTimePanelVM = StatisticsTimePanelVM
|
|
Return Not IsNothing(m_refStatisticsTimePanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefPDFEditorVM(PDFEditorVM As PDFEditorVM) As Boolean
|
|
m_refPDFEditorVM = PDFEditorVM
|
|
Return Not IsNothing(m_refPDFEditorVM)
|
|
End Function
|
|
|
|
Friend Function SetRefProdManagerVM(ProdManagerVM As ProdManagerVM) As Boolean
|
|
m_refProdManagerVM = ProdManagerVM
|
|
Return Not IsNothing(m_refProdManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefBTLPartManagerVM(BTLPartManagerVM As BTLPartManagerVM) As Boolean
|
|
m_refBTLPartManagerVM = BTLPartManagerVM
|
|
Return Not IsNothing(m_refBTLPartManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefRawPartManagerVM(RawPartManagerVM As RawPartManagerVM) As Boolean
|
|
m_refRawPartManagerVM = RawPartManagerVM
|
|
Return Not IsNothing(m_refRawPartManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefFeatureListManagerVM(FeatureListManagerVM As FeatureListManagerVM) As Boolean
|
|
m_refFeatureListManagerVM = FeatureListManagerVM
|
|
Return Not IsNothing(m_refFeatureListManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefSpecialPanelVM(SpecialPanelVM As SpecialPanelVM) As Boolean
|
|
m_refSpecialPanelVM = SpecialPanelVM
|
|
Return Not IsNothing(m_refSpecialPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefStrategyManagerVM(StrategyManagerVM As StrategyManagerVM) As Boolean
|
|
m_refStrategyManagerVM = StrategyManagerVM
|
|
Return Not IsNothing(m_refStrategyManagerVM)
|
|
End Function
|
|
|
|
Friend Function SetRefForcedStrategyPanelVM(ForcedStrategyPanelVM As ForcedStrategyPanelVM) As Boolean
|
|
m_refForcedStrategyPanelVM = ForcedStrategyPanelVM
|
|
Return Not IsNothing(m_refForcedStrategyPanelVM)
|
|
End Function
|
|
|
|
Friend Function SetRefGeneralParametersStrategyVM(GeneralParametersStrategyVM As GeneralParametersStrategyVM) As Boolean
|
|
m_refGeneralParametersStrategyVM = GeneralParametersStrategyVM
|
|
Return Not IsNothing(m_refGeneralParametersStrategyVM)
|
|
End Function
|
|
|
|
Friend Function SetRefSceneShowBuldingVM(SceneShowBuldingVM As SceneShowBuldingVM) As Boolean
|
|
m_refSceneShowBuldingVM = SceneShowBuldingVM
|
|
Return Not IsNothing(m_refSceneShowBuldingVM)
|
|
End Function
|
|
|
|
Friend Function SetRefSceneBuildingVM(SceneBuildingVM As SceneBuildingVM) As Boolean
|
|
m_refSceneBuildingVM = SceneBuildingVM
|
|
Return Not IsNothing(m_refSceneBuildingVM)
|
|
End Function
|
|
|
|
Friend Function SetRefMyMachine(MyMachine As MyMachine) As Boolean
|
|
m_refMyMachine = MyMachine
|
|
Return Not IsNothing(m_refMyMachine)
|
|
End Function
|
|
|
|
Friend Function SetRefBTLDataWndVM(BTLDataWndVM As BTLDataWndVM) As Boolean
|
|
m_refBTLDataWndVM = BTLDataWndVM
|
|
Return Not IsNothing(m_refBTLDataWndVM)
|
|
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
|
|
Return Not IsNothing(m_refMainWindowVM) AndAlso Not IsNothing(m_refMainMenuVM) AndAlso
|
|
Not IsNothing(LibMap.refStatusBarVM) AndAlso Not IsNothing(m_refConfigurationPageVM) AndAlso
|
|
Not IsNothing(LibMap.refSceneHostVM) AndAlso Not IsNothing(LibMap.refShowPanelVM) AndAlso
|
|
Not IsNothing(CoreMap.refMachinePanelVM) AndAlso Not IsNothing(LibMap.refMachGroupPanelVM) AndAlso
|
|
Not IsNothing(m_refRawPartListVM) AndAlso Not IsNothing(m_refWarehouseWndVM) AndAlso
|
|
Not IsNothing(m_refSceneBuildingVM) AndAlso Not IsNothing(m_refSceneShowBuldingVM) AndAlso
|
|
Not IsNothing(m_refFreeContourManagerVM) AndAlso Not IsNothing(m_refFreeContourInputVM) AndAlso
|
|
Not IsNothing(m_refInstrumentPanelVM) AndAlso Not IsNothing(m_refPartManagerVM) AndAlso
|
|
Not IsNothing(m_refOptimizePanelVM) AndAlso Not IsNothing(m_refShowBeamPanelVM) AndAlso
|
|
Not IsNothing(m_refCALCPanelVM) AndAlso Not IsNothing(m_refPartListVM) AndAlso
|
|
Not IsNothing(m_refFeatureInPartInRawPartListVM) AndAlso Not IsNothing(m_refStatisticsVM) AndAlso
|
|
Not IsNothing(m_refPParameterListVM) AndAlso Not IsNothing(m_refFeatureManagerVM) AndAlso
|
|
Not IsNothing(m_refStatisticsTimePanelVM) AndAlso Not IsNothing(m_refMyMachine) AndAlso
|
|
Not IsNothing(m_refPDFEditorVM) AndAlso Not IsNothing(m_refSpecialPanelVM) AndAlso
|
|
Not IsNothing(m_refProdManagerVM) AndAlso Not IsNothing(m_refBTLPartManagerVM) AndAlso
|
|
Not IsNothing(m_refRawPartManagerVM) AndAlso Not IsNothing(m_refFeatureListManagerVM) AndAlso
|
|
Not IsNothing(m_refSpecialPanelVM) AndAlso Not IsNothing(m_refStrategyManagerVM) AndAlso
|
|
Not IsNothing(m_refForcedStrategyPanelVM) AndAlso Not IsNothing(m_refGeneralParametersStrategyVM) AndAlso
|
|
Not IsNothing(m_refBTLDataWndVM) AndAlso
|
|
Not LibMap.EndInit()
|
|
End Function
|
|
|
|
#End Region ' Init
|
|
|
|
End Module
|