TestEIn 1.8j5 :

- aggiornamento.

EgtInterface.vb

@@ -9197,6 +9197,48 @@ End Function
       End If
    End Function
 
+   <DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtPreparePreviewMachiningTool"), SuppressUnmanagedCodeSecurity()>
+   Private Function EgtPreparePreviewMachiningTool_32() As Boolean
+   End Function
+   <DllImport(EgtIntDll64, CharSet:=CharSet.Unicode, EntryPoint:="EgtPreparePreviewMachiningTool"), SuppressUnmanagedCodeSecurity()>
+   Private Function EgtPreparePreviewMachiningTool_64() As Boolean
+   End Function
+   Public Function EgtPreparePreviewMachiningTool() As Boolean
+      If IntPtr.Size = 4 Then
+         Return EgtPreparePreviewMachiningTool_32()
+      Else
+         Return EgtPreparePreviewMachiningTool_64()
+      End If
+   End Function
+
+   <DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtRemovePreviewMachiningTool"), SuppressUnmanagedCodeSecurity()>
+   Private Function EgtRemovePreviewMachiningTool_32() As Boolean
+   End Function
+   <DllImport(EgtIntDll64, CharSet:=CharSet.Unicode, EntryPoint:="EgtRemovePreviewMachiningTool"), SuppressUnmanagedCodeSecurity()>
+   Private Function EgtRemovePreviewMachiningTool_64() As Boolean
+   End Function
+   Public Function EgtRemovePreviewMachiningTool() As Boolean
+      If IntPtr.Size = 4 Then
+         Return EgtRemovePreviewMachiningTool_32()
+      Else
+         Return EgtRemovePreviewMachiningTool_64()
+      End If
+   End Function
+
+   <DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtPreviewMachiningTool"), SuppressUnmanagedCodeSecurity()>
+   Private Function EgtPreviewMachiningTool_32(nEntId As Integer, nFlag As Integer) As Integer
+   End Function
+   <DllImport(EgtIntDll64, CharSet:=CharSet.Unicode, EntryPoint:="EgtPreviewMachiningTool"), SuppressUnmanagedCodeSecurity()>
+   Private Function EgtPreviewMachiningTool_64(nEntId As Integer, nFlag As Integer) As Integer
+   End Function
+   Public Function EgtPreviewMachiningTool(nEntId As Integer, nFlag As Integer) As Integer
+      If IntPtr.Size = 4 Then
+         Return EgtPreviewMachiningTool_32(nEntId, nFlag)
+      Else
+         Return EgtPreviewMachiningTool_64(nEntId, nFlag)
+      End If
+   End Function
+
    <DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtGetMachiningParamBool"), SuppressUnmanagedCodeSecurity()>
    Private Function EgtGetMachiningParamBool_32(nType As Integer, ByRef bVal As Boolean) As Boolean
    End Function
@@ -11644,6 +11686,11 @@ Public FIX_VIS As String = "VIS"
 Public REF_ARC As String = "Ref"
 ' Costanti : disco colorato dei riferimenti 
 Public REF_DISK As String = "RefDisk"
+' Costanti : nomi sottogruppi della lavorazione
+Public MCH_MGR_PV As String = "PV"
+Public MCH_MGR_CL As String = "CL"
+Public MCH_MGR_ST As String = "ST"
+Public MCH_MGR_PATH As String = "P"
 ' Costanti : tipo interferenza lavorazioni piane con pezzi
 Public Enum FMI_TYPE As Integer
    NONE = 0
@@ -12035,7 +12082,12 @@ Public Enum MCH_CHISEL_WS As Integer
    LEFT = 1
    RIGHT = 2
 End Enum
-
+'Costanti : posizione per preview utensile in lavorazione
+Public Enum MCH_PTM As Integer
+   CURR = 0
+   BEFORE = -1
+   AFTER = 1
+End Enum
 'Costanti : stato movimento di simulazione
 Public Enum MCH_SIM As Integer
    OK = 0

My Project/AssemblyInfo.vb

@@ -46,5 +46,5 @@ Imports System.Runtime.InteropServices
 ' utilizzando l'asterisco (*) come descritto di seguito:
 ' <Assembly: AssemblyVersion("1.0.*")> 
 
-<Assembly: AssemblyVersion("1.8.10.4")> 
-<Assembly: AssemblyFileVersion("1.8.10.4")> 
+<Assembly: AssemblyVersion("1.8.10.5")> 
+<Assembly: AssemblyFileVersion("1.8.10.5")>