1. . : () (). .
2. . . .
SW api AddMate3 (c 2005 ) IAssemblyDoc.
13 . Mate2 ( ).
[Mate2] = [AssemblyDoc].AddMate3 (MateTypeFromEnum, AlignFromEnum, Flip, Distance, DistanceAbsUpperLimit, DistanceAbsLowerLimit, GearRatioNumerator, GearRatioDenominator, Angle, AngleAbsUpperLimit, AngleAbsLowerLimit, ForPositioningOnly, ErrorStatus)
1. MateTypeFromEnum. long. enum- swMateType_e.
:
0 swMateCOINCIDENT
1 swMateCONCENTRIC
2 swMatePERPENDICULAR
3 swMatePARALLEL
4 swMateTANGENT
5 swMateDISTANCE
6 swMateANGLE-
8 swMateSYMMETRIC
2. AlignFromEnum. long. . enum- swMateAlign_e. :
0 swMateAlignALIGNED
1 swMateAlignANTI_ALIGNED
2 swMateAlignCLOSEST
3. Flip. boolean. True .
4. Distance. double. swMateDISTANCE ( ) .
5. DistanceAbsUpperLimit. double. .
6. DistanceAbsLowerLimit. double. .
7. GearRatioNumerator. double. .
8. GearRatioDenominator. double. .
9. Angle. double. .
10. AngleAbsUpperLimit. double. .
11. AngleAbsLowerLimit. double. .
12. ForPositioningOnly. boolean. True .
13. ErrorStatus. long. . enum- swAddMateError_e
:
0
1 . .
2 , swMateType_e.
3
4
5
6
:
1 ():
Visual Basic
Option Explicit Dim swApp As SldWorks.SldWorks Dim model As ModelDoc2 Dim assem As AssemblyDoc Dim sel As SelectionMgr Dim face1 As face2, face2 As face2 Dim err As Long Sub main() Set swApp = Application.SldWorks Set model = swApp.ActiveDoc Set assem = model Set sel = model.SelectionManager Set face1 = sel.GetSelectedObject6(1, 1) Set face2 = sel.GetSelectedObject6(2, 1) assem.AddMate3 swMateCONCENTRIC, swMateAlignALIGNED, False, 0, 0, 0, 0, 0, 0, 0, 0, False, err End Sub
|
|
Option Explicit Dim swApp As SldWorks.SldWorks Dim model As ModelDoc2 Dim assem As AssemblyDoc Dim sel As SelectionMgr Dim face1 As face2, face2 As face2 Dim err As Long Sub main() Set swApp = Application.SldWorks Set model = swApp.ActiveDoc Set assem = model Set sel = model.SelectionManager Set face1 = sel.GetSelectedObject6(1, 1) Set face2 = sel.GetSelectedObject6(2, 1) assem.AddMate3 swMateCONCENTRIC, swMateAlignALIGNED, False, 0, 0, 0, 0, 0, 0, 0, 0, False, err End Sub |
2 AddMate3 .
Visual Basic
assem.AddMate3 swMateCOINCIDENT, swMateAlignCLOSEST, False, 0, 0, 0, 0, 0, 0, 0, 0, False, err
assem.AddMate3 swMateCOINCIDENT, swMateAlignCLOSEST, False, 0, 0, 0, 0, 0, 0, 0, 0, False, err |