Nicola Pievani
65dee8bf4c
-> aggiornamento automatico della lista "PartList"; -> verifica funzionamento ultima versione.
23 lines
679 B
VB.net
23 lines
679 B
VB.net
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
|