EgtCAM5 :

- Migliorato Db Utensili.
- Migliorato SetUp.
- Migliorato Db Lavorazioni.

SetUpWindow/SetUpViewModel.vb

@@ -310,7 +310,6 @@ Namespace EgtCAM5
             ' se ci sono almeno due elementi sono sicuro che ci sia la H
             If sItems.Count >= 2 Then
                sHead = sItems(1)
-               ''m_PositionGroupList(nGroup - 1).PositionList.Add(New Position(sTcPos, sHead, EgtGetHeadExitCount(sHead)))
                ' se ci sono almeno tre elementi sono sicuro che ci sia almeno un'uscita attrezzata
                If sItems.Count >= 3 Then
                   ' separo le uscite divise dalla ,
@@ -663,7 +662,7 @@ Namespace EgtCAM5
          OpenFileDialogView.Filter = "*.stu"
          OpenFileDialogView.Directory = sDir
          OpenFileDialogView.FileName = String.Empty
-         If Not OpenFileDialogView.ShowDialog Then
+         If Not OpenFileDialogView.EgtShowDialog Then
             Return
          End If
          sPath = OpenFileDialogView.FileName