Friend Module DxfImportWindowMap Private m_refDxfImportWindowVM As DxfImportWindowVM Private m_refDxfImportSceneHostV As DxfImportSceneHostV #Region "Get" Public ReadOnly Property refDxfImportWindowVM As DxfImportWindowVM Get Return m_refDxfImportWindowVM End Get End Property Public ReadOnly Property refDxfImportSceneHostV As DxfImportSceneHostV Get Return m_refDxfImportSceneHostV End Get End Property #End Region ' Get #Region "Set" Friend Function SetRefDxfImportSceneHostV(DxfImportSceneHostV As DxfImportSceneHostV) As Boolean m_refDxfImportSceneHostV = DxfImportSceneHostV Return Not IsNothing(m_refDxfImportSceneHostV) End Function #End Region ' Set #Region "Init" Friend Function BeginInit(DxfImportWindowVM As DxfImportWindowVM) As Boolean m_refDxfImportWindowVM = DxfImportWindowVM Return Not IsNothing(m_refDxfImportWindowVM) End Function Friend Function EndInit() As Boolean ' Verifico se tutti i pezzi necessari sono stati caricati Return Not IsNothing(m_refDxfImportWindowVM) AndAlso Not IsNothing(m_refDxfImportSceneHostV) End Function #End Region ' Init End Module