TestEIn 1.6o2 :
- aggiornamenti.
This commit is contained in:
+21
-7
@@ -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
|
||||
|
||||
@@ -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")>
|
||||
|
||||
Reference in New Issue
Block a user