From b9087e2c6458f617608c28709ac4a0d09fd41dc8 Mon Sep 17 00:00:00 2001
From: Dario Sassi <dario.s@egaltech.com>
Date: Fri, 18 Mar 2016 07:58:53 +0000
Subject: [PATCH] TestEIn 1.6o2 : - aggiornamenti.

---
 EgtInterface.vb            | 28 +++++++++++++++++++++-------
 My Project/AssemblyInfo.vb |  4 ++--
 2 files changed, 23 insertions(+), 9 deletions(-)

diff --git a/EgtInterface.vb b/EgtInterface.vb
index 83aafcd..0060909 100644
--- a/EgtInterface.vb
+++ b/EgtInterface.vb
@@ -7430,6 +7430,20 @@ Public Function EgtLoadTool(sHead As String, nExit As Integer, sTool As String)
    End If
 End Function
 
+<DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtResetHeadSet")>
+Private Function EgtResetHeadSet_32(sHead As String) As Boolean
+End Function
+<DllImport(EgtIntDll64, CharSet:=CharSet.Unicode, EntryPoint:="EgtResetHeadSet")>
+Private Function EgtResetHeadSet_64(sHead As String) As Boolean
+End Function
+Public Function EgtResetHeadSet(sHead As String) As Boolean
+   If IntPtr.Size = 4 Then
+      Return EgtResetHeadSet_32(sHead)
+   Else
+      Return EgtResetHeadSet_64(sHead)
+   End If
+End Function
+
 <DllImport(EgtIntDll32, CharSet:=CharSet.Unicode, EntryPoint:="EgtSetMachineLook")>
 Private Function EgtSetMachineLook_32(nFlag As Integer) As Boolean
 End Function
@@ -9135,13 +9149,13 @@ Public Enum MCH_MP As Integer
    LEADOUTTYPE = 8197
    CURVEUSE = 8198
    STEPTYPE = 8199
-   TOOLSPEED = 16384
-   TOOLFEED = 16385
-   TOOLSTARTFEED = 16386
-   TOOLENDFEED = 16387
-   TOOLTIPFEED = 16388
-   TOOLOFFSR = 16389
-   TOOLOFFSL = 16390
+   SPEED = 16384
+   FEED = 16385
+   STARTFEED = 16386
+   ENDFEED = 16387
+   TIPFEED = 16388
+   OFFSR = 16389
+   OFFSL = 16390
    DEPTH = 16391
    SIDEANGLE = 16392
    APPROX = 16393
diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb
index e803a66..42b2060 100644
--- a/My Project/AssemblyInfo.vb	
+++ b/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.15.1")> 
-<Assembly: AssemblyFileVersion("1.6.15.1")> 
+<Assembly: AssemblyVersion("1.6.15.2")> 
+<Assembly: AssemblyFileVersion("1.6.15.2")>