TestEIn 1.6s4 :

- ricompilazione per aggiornamento interfaccia.

EgtInterface.vb

@@ -7730,6 +7730,20 @@ Public Function EgtGetCurrMachining() As Integer
    End If
 End Function
 
+<DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtSetMachiningParamBool")>
+Private Function EgtSetMachiningParamBool_32(nType As Integer, nVal As Boolean) As Boolean
+End Function
+<DllImport(EgtIntDll64, CharSet:=CharSet.Unicode, EntryPoint:="EgtSetMachiningParamBool")>
+Private Function EgtSetMachiningParamBool_64(nType As Integer, nVal As Boolean) As Boolean
+End Function
+Public Function EgtSetMachiningParam(nType As Integer, nVal As Boolean) As Boolean
+   If IntPtr.Size = 4 Then
+      Return EgtSetMachiningParamBool_32(nType, nVal)
+   Else
+      Return EgtSetMachiningParamBool_64(nType, nVal)
+   End If
+End Function
+
 <DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtSetMachiningParamInt")>
 Private Function EgtSetMachiningParamInt_32(nType As Integer, nVal As Integer) As Boolean
 End Function
@@ -7826,6 +7840,20 @@ Public Function EgtApplyMachining(bRecalc As Boolean) As Boolean
    End If
 End Function
 
+<DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtGetMachiningParamBool")>
+Private Function EgtGetMachiningParamBool_32(nType As Integer, ByRef bVal As Boolean) As Boolean
+End Function
+<DllImport(EgtIntDll64, CharSet:=CharSet.Unicode, EntryPoint:="EgtGetMachiningParamBool")>
+Private Function EgtGetMachiningParamBool_64(nType As Integer, ByRef bVal As Boolean) As Boolean
+End Function
+Public Function EgtGetMachiningParam(nType As Integer, ByRef bVal As Boolean) As Boolean
+   If IntPtr.Size = 4 Then
+      Return EgtGetMachiningParamBool_32(nType, bVal)
+   Else
+      Return EgtGetMachiningParamBool_64(nType, bVal)
+   End If
+End Function
+
 <DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtGetMachiningParamInt")>
 Private Function EgtGetMachiningParamInt_32(nType As Integer, ByRef nVal As Integer) As Boolean
 End Function
@@ -10179,7 +10207,8 @@ Public Enum MCH_MIL_LI As Integer
    LINEAR = 1
    TANGENT = 2
    GLIDE = 3
-   HELIX = 4
+   ZIGZAG = 4
+   HELIX = 5
 End Enum
    'Tipo di uscita
 Public Enum MCH_MIL_LO As Integer

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.6.19.3")> 
-<Assembly: AssemblyFileVersion("1.6.19.3")> 
+<Assembly: AssemblyVersion("1.6.19.4")> 
+<Assembly: AssemblyFileVersion("1.6.19.4")>