EgtCAM5 2.2c1 :

- Gestione dei parametri da visualizzare per ciascun utensile del DB Utensile ora è spostata sulla libreria EgtWPFLib5 (come già fatto per Db Lavorazioni)
- Cancellati file non più necessari grazie alla nuova gestione

MachinePanel/MachinePanelVM.vb

@@ -128,12 +128,23 @@ Public Class MachinePanelVM
          MessageBox.Show(EgtMsg(MSG_TOOLSERRORS + 30), EgtMsg(MSG_MESSAGEBOX + 1), MessageBoxButton.OK, MessageBoxImage.Error)
          Return
       End If
-      Dim ToolDbWindow As New ToolsDbV
-      ToolDbWindow.Height = 640
-      ToolDbWindow.Width = 1024
-      ToolDbWindow.DataContext = New ToolsDbVM
-      ToolDbWindow.Owner = Application.Current.MainWindow
-      ToolDbWindow.ShowDialog()
+      'Dim ToolDbWindow As New ToolsDbV
+      'ToolDbWindow.Height = 640
+      'ToolDbWindow.Width = 1024
+      'ToolDbWindow.DataContext = New ToolsDbVM
+      'ToolDbWindow.Owner = Application.Current.MainWindow
+      'ToolDbWindow.ShowDialog()
+
+      Dim sMachineDir As String = IniFile.m_sMachinesRoot & "\" & IniFile.m_sMachineName
+      Dim ToolDbWindowVM As New MyToolDbWindowVM(sMachineDir, IniFile.m_sCurrMachIniFilePath, IniFile.m_ProjectSceneContext, "Wood")
+      Dim ToolDbWindowV As New EgtWPFLib5.ToolDbWindowV(Application.Current.MainWindow, ToolDbWindowVM)
+      If ToolDbWindowVM.MatType <> 0 Then
+         ToolDbWindowV.Height = 674
+         ToolDbWindowV.Width = 1024
+         ToolDbWindowV.Owner = Application.Current.MainWindow
+         ToolDbWindowV.ShowDialog()
+      End If
+
    End Sub
 
 #End Region    ' ToolDbCommand