Imports System.IO
Imports System.Runtime.CompilerServices
Imports System.Runtime.InteropServices
Imports System.Text
Imports System.Windows.Interop
Imports System.Xml
Imports System.Xml.Serialization
Imports Effector.Plugin.Lib

Class MainWindowV

   Private m_MainWindowVM As MainWindowVM

#Region "CONSTRUCTOR"

   Sub New()
      m_MainWindowVM = New MainWindowVM
      ' Funzione che interpreta l'xaml
      InitializeComponent()
      ' Assegno al DataContext il VM appena creato
      Me.DataContext = m_MainWindowVM
      'AddHandler Me.ContentRendered, AddressOf MainWindowV_ContentRendered
      ' imposto posizione finestra
      Me.SetPlacementAppName(S_GENERAL)
      Me.SetPlacementKeyName(K_WINPLACE)
      Me.SetPlacementFileName(IniFile.sPath)
   End Sub

#End Region    ' CONSTRUCTOR

#Region "METHODS"

#End Region    ' METHODS

#Region "EVENTS"

   Protected Overrides Sub OnContentRendered(e As EventArgs)
      MyBase.OnContentRendered(e)
      m_MainWindowVM.ContentRendered()
   End Sub
   Private Sub MainWindowV_ContentRendered(sender As Object, e As EventArgs)
      m_MainWindowVM.ContentRendered()
   End Sub

   Public Overrides Sub OnCloseButtonClick(ByVal sender As Object, ByVal e As RoutedEventArgs)
      If m_MainWindowVM.OnClose() Then
         EgtOutLog("Exit")
         Me.Close()
      End If
   End Sub

#End Region    ' EVENTS

End Class