Egalware/TestEIn
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

TestEIn :

Browse Source 
- correzione ad alcuni prototipi dell'interfaccia.
This commit is contained in:
Dario Sassi
2015-05-26 06:52:54 +00:00
parent 318e414014
commit b20f412f55
1 changed files with 9 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files
EgtInterface.vb
+9 -11
View File
@@ -1275,7 +1275,7 @@ End Function
<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
Private Function EgtGetGroupGlobFrame(ByVal nId As Integer,
ByRef PtOrig As Point3d, ByRef VtX As Vector3d, ByRef VtY As Vector3d, ByRef VtZ As Vector3d) As Boolean
ByRef PtOrig As Point3d, ByRef VtX As Vector3d, ByRef VtY As Vector3d, ByRef VtZ As Vector3d) As Boolean
End Function
Public Function EgtGetGroupGlobFrame(ByVal nId As Integer, ByRef frGRef As Frame3d) As Boolean
Dim PtOrig As Point3d
@@ -1767,14 +1767,12 @@ Public Function EgtFrame(ByVal nId As Integer, ByVal nRefId As Integer, ByRef fr
End If
End Function
<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
Public Function EgtCurveLength(ByVal nId As Integer, ByRef dLen As Double) As Boolean
End Function
<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
Public Function EgtCurveLengthAtPoint(ByVal nId As Integer, ByVal ptOn As Point3d, ByVal dExtend As Double, ByRef dLen As Double) As Boolean
Public Function EgtCurveLengthAtPoint(ByVal nId As Integer, ByRef ptOn As Point3d, ByVal dExtend As Double, ByRef dLen As Double) As Boolean
End Function
Public Function EgtCurveLengthAtPoint(ByVal nId As Integer, ByVal ptOn As Point3d, ByRef dLen As Double) As Boolean
Return EgtCurveLengthAtPoint(nId, ptOn, 0, dLen)
@@ -1796,7 +1794,7 @@ Public Function EgtGetMinDistPointCurve(ByRef ptP As Point3d, ByVal nId As Integ
End Function
<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
Public Function EgtGetMinDistPntSidePointCurve(ByVal ptP As Point3d, ByVal nId As Integer, ByVal vtN As Vector3d,
Public Function EgtGetMinDistPntSidePointCurve(ByRef ptP As Point3d, ByVal nId As Integer, ByRef vtN As Vector3d,
ByRef dDist As Double, ByRef ptMin As Point3d, ByRef nSide As Integer) As Boolean
End Function
@@ -1986,12 +1984,12 @@ End Function
<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
Private Function EgtGetGridSnapPointZ(ByVal bSketch As Boolean,
ByVal nWinX As Integer, ByVal nWinY As Integer, ByRef ptGrid As Point3d,
ByRef ptP As Point3d) As Boolean
ByVal nWinX As Integer, ByVal nWinY As Integer, ByRef ptGrid As Point3d,
ByRef ptP As Point3d) As Boolean
End Function
Public Function EgtGetGridSnapPointZ(ByVal bSketch As Boolean,
ByVal PtWin As Point, ByVal ptGrid As Point3d,
ByRef ptP As Point3d) As Boolean
ByVal PtWin As Point, ByVal ptGrid As Point3d,
ByRef ptP As Point3d) As Boolean
Return EgtGetGridSnapPointZ(bSketch, PtWin.X, PtWin.Y, ptGrid, ptP)
End Function
@@ -2232,8 +2230,8 @@ End Function
<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>
Private Function EgtFrameLocToLoc(ByRef PtOrig As Point3d, ByRef VtX As Vector3d, ByRef VtY As Vector3d, ByRef VtZ As Vector3d,
ByRef PtO1 As Point3d, ByRef VtX1 As Vector3d, ByRef VtY1 As Vector3d, ByRef VtZ1 As Vector3d,
ByRef PtO2 As Point3d, ByRef VtX2 As Vector3d, ByRef VtY2 As Vector3d, ByRef VtZ2 As Vector3d) As Boolean
ByRef PtO1 As Point3d, ByRef VtX1 As Vector3d, ByRef VtY1 As Vector3d, ByRef VtZ1 As Vector3d,
ByRef PtO2 As Point3d, ByRef VtX2 As Vector3d, ByRef VtY2 As Vector3d, ByRef VtZ2 As Vector3d) As Boolean
End Function
<DllImport(EgtIntDll, CharSet:=CharSet.Unicode)>