diff --git a/EgtInterface.vb b/EgtInterface.vb index 876d55c..9d83cb0 100644 --- a/EgtInterface.vb +++ b/EgtInterface.vb @@ -7358,6 +7358,34 @@ End Function End If End Function + + Private Function EgtMovePartInRawPart_32(nRawId As Integer, ByRef vtMove As Vector3d) As Boolean + End Function + + Private Function EgtMovePartInRawPart_64(nRawId As Integer, ByRef vtMove As Vector3d) As Boolean + End Function + Public Function EgtMovePartInRawPart(nRawId As Integer, ByRef vtMove As Vector3d) As Boolean + If IntPtr.Size = 4 Then + Return EgtMovePartInRawPart_32(nRawId, vtMove) + Else + Return EgtMovePartInRawPart_64(nRawId, vtMove) + End If + End Function + + + Private Function EgtRotatePartInRawPart_32(nRawId As Integer, ByRef vtAx As Vector3d, dAngDeg As Double) As Boolean + End Function + + Private Function EgtRotatePartInRawPart_64(nRawId As Integer, ByRef vtAx As Vector3d, dAngDeg As Double) As Boolean + End Function + Public Function EgtRotatePartInRawPart(nRawId As Integer, ByRef vtAx As Vector3d, dAngDeg As Double) As Boolean + If IntPtr.Size = 4 Then + Return EgtRotatePartInRawPart_32(nRawId, vtAx, dAngDeg) + Else + Return EgtRotatePartInRawPart_64(nRawId, vtAx, dAngDeg) + End If + End Function + ' Table & Fixtures Private Function EgtSetTable_32(sTable As String) As Boolean diff --git a/My Project/AssemblyInfo.vb b/My Project/AssemblyInfo.vb index 787d636..9c7b4b2 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: ' - - + +