Imports EgtWPFLib5.EgtFloating

Public Class ProjectV

   Private m_bSpecial As Boolean = False
   Private m_bBeam As Boolean = False
   Private m_bWall As Boolean = False
   Private m_bDoors As Boolean = False
   Private m_bGunStock As Boolean = False

   Private Sub UserControl_Initialized(sender As Object, e As EventArgs) Handles Me.Initialized
      ' Creo riferimento a questa classe in Map
      Map.SetRefProjectV(Me)
   End Sub

   Private Sub UserControl_Loaded(sender As Object, e As RoutedEventArgs) Handles Me.Loaded
      ' Leggo posizioni Floating window
      Dim sState As String = String.Empty
      Dim nIndex As Integer = -1
      Dim nLeft As Integer = -1
      Dim nTop As Integer = -1
      m_bSpecial = IniFile.IsActiveSpecialPanel()
      m_bBeam = IniFile.IsActiveBeam()
      m_bWall = IniFile.IsActiveWall()
      m_bDoors = IniFile.IsActiveDoors()
      m_bGunStock = IniFile.IsActiveGunStock()
   End Sub

   Private Sub PanelPositioning(FloatingPanel As EgtFloatingPanel, sState As String, nIndex As Integer, nLeft As Integer, nTop As Integer)
   End Sub

   Friend Sub SetDbPanelVisibility()
   End Sub

   Friend Sub MachiningMode_IsChecked()
      Map.refMachGroupPanelVM.SetMachGroupPanelVisibility(IniFile.m_bMachiningGroup) ' MachGroupPanel.Visibility = If(IniFile.m_bMachiningGroup, Visibility.Visible, Visibility.Collapsed)
      If m_bDoors Then Map.refDoorPanelVM.SetDoorPanelButtonsVisibility(False)
   End Sub

   Friend Sub DrawMode_IsChecked()
   End Sub

   Private Sub UserControl_Unloaded(sender As Object, e As RoutedEventArgs) Handles Me.Unloaded
      ' Salvo le posizioni di tutti gli EgtPanel
   End Sub

End Class