Imports EgtUILib
Imports EgtWPFLib5

Public Class MyShowPanelVM
   Inherits ShowPanelVM

#Region "CONSTRUCTOR"

   Sub New()
      ' modo di visualizzazione
      Dim nShowMode As Integer = GetMainPrivateProfileInt(S_SCENE, K_SHOWMODE, SM.SHADING)
      Map.refShowPanelVM.SetShowMode(DirectCast(nShowMode, SM))
      ' visualizzazione freccia direzione su curve
      Map.refShowPanelVM.CurveDirIsChecked = EgtGetShowCurveDirection()
   End Sub

#End Region    ' CONSTRUCTOR


End Class