.


:




:

































 

 

 

 





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

 





:


: 2017-02-11; !; : 535 |


:

:

, .
==> ...

1715 - | 1497 -


© 2015-2024 lektsii.org - -

: 0.008 .