Imports System.Windows.Interop Imports System.IO Imports EgtUILib Imports EgtWPFLib5 Public Class SceneHostV Private m_SceneHostVM As MySceneHostVM Sub New() ' This call is required by the designer. InitializeComponent() ' Assegno al riferimento locale al VM il VM preso dal DataContext Me.DataContext = Map.refSceneHostVM m_SceneHostVM = DirectCast(Me.DataContext, MySceneHostVM) m_SceneHostVM.SetMainScene(MainScene) MainScene.SetStatusNull() 'MainScene.SetObjFilterForSel(False, False, True, False, False) 'EgtSetObjFilterForSelect(False, False, True, False, False) End Sub End Class