TestEIn 1.6u5 :

- aggiornamento.

Controller.vb

@@ -197,9 +197,7 @@ Public Class Controller
    ' Metodi
    Public Function NewProject(Optional ByVal bCreatePart As Boolean = False) As Boolean
       ' gestisco eventuale file corrente modificato
-      If Not ManageModified() Then
-         Return False
-      End If
+      If Not ManageModified() Then Return False
       ' reset controller e scena
       ResetStatus()
       m_Scene.ResetStatus(False)
@@ -229,9 +227,7 @@ Public Class Controller
 
    Public Function OpenProject(Optional ByVal sDir As String = "", Optional ByVal bWithDlg As Boolean = True) As Boolean
       ' gestisco eventuale file corrente modificato
-      If Not ManageModified() Then
-         Return False
-      End If
+      If Not ManageModified() Then Return False
       ' reset controller e scena
       ResetStatus()
       m_Scene.ResetStatus(False)
@@ -251,9 +247,9 @@ Public Class Controller
          End If
          sFile = OpenFileDialog.FileName
       End If
-      'Prima del caricamento
+      ' Prima del caricamento
       RaiseEvent OnOpeningProject(Me)
-      'Caricamento del progetto
+      ' Caricamento del progetto
       m_Scene.Cursor = Cursors.WaitCursor
       EnableCommandLog()
       Dim bOk As Boolean = EgtOpenFile(sFile)
@@ -557,6 +553,13 @@ Public Class Controller
       Return bOk
    End Function
 
+   Public Sub MouseSetObjFilterForSelect(bZeroDim As Boolean, bCurve As Boolean,
+                                         bSurf As Boolean, bVolume As Boolean, bExtra As Boolean)
+      EnableCommandLog()
+      EgtSetObjFilterForSelect(bZeroDim, bCurve, bSurf, bVolume, bExtra)
+      DisableCommandLog()
+   End Sub
+
    Public Sub MouseSelectedAll()
       ' eseguo la selezione ed aggiorno
       EnableCommandLog()
@@ -4297,8 +4300,11 @@ Public Class Controller
          ' recupero spessore dell'ultima entità selezionata
          Dim dThick As Double
          If EgtCurveThickness(EgtGetLastSelectedObj(), dThick) Then
-            SetInputBoxDouble(dThick, True)
+            m_dLast = dThick
+         Else
+            m_dLast = 0
          End If
+         SetInputBoxDouble(m_dLast, True)
          RaiseEvent SetInputBoxCheck(False)
       Case 1
          EnableCommandLog()