EgtCAM5 :

- Migliorie varie.

ProjectPage/OptionPanel/DrawOptionPanel/DrawOptionPanelViewModel.vb

@@ -129,47 +129,11 @@ Namespace EgtCAM5
          End Get
       End Property
 
-      ' Definizione comandi
-      Private m_cmdClosing As ICommand
-
       Sub New()
          ' Inizializzo la selezione della modilità Draw all'apertura del programma
          DrawIsChecked = True
       End Sub
 
-#Region "COMMANDS"
-
-#Region "ClosingCommand"
-
-      ''' <summary>
-      ''' Returns a command that create a new tool.
-      ''' </summary>
-      Public ReadOnly Property ClosingCommand As ICommand
-         Get
-            If m_cmdClosing Is Nothing Then
-               m_cmdClosing = New RelayCommand(AddressOf Closing, AddressOf CanClosing)
-            End If
-            Return m_cmdClosing
-         End Get
-      End Property
-
-      ''' <summary>
-      ''' Creata the new tool.  This method is invoked by the NewCommand.
-      ''' </summary>
-      Public Sub Closing(ByVal param As Object)
-         Application.Msn.NotifyColleagues(Application.DRAWOPTIONPANEL_CLOSING)
-      End Sub
-
-      ''' <summary>
-      ''' Returns true if the selected treeviewitem is valid for new tool creation.
-      ''' </summary>
-      Private Function CanClosing(ByVal param As Object) As Boolean
-         Return True
-      End Function
-
-#End Region ' ClosingCommand
-
-#End Region     ' Commands
    End Class
 
 End Namespace