分享
 
 
 

Solidworks二次开发—06—在装配体中添加配合

王朝c#·作者佚名  2006-12-17
窄屏简体版  字體: |||超大  

Solidworks二次开发—06—在装配体中添加配合

折腾了三天终于完成了计划中的功能模块。在一个装配体中自动判断插入合适的零件,并添加配合。

在前面几篇文章中我已经基本上说明了如何得到零部件的数据信息、如何插入零部件、如何得到已经选择的特征等。

下面只介绍怎样进行配合

在做配合时,需要经常选择到零件的面、线等,这是一个问题,还有就是介绍一下addmate2函数的使用:

一般进行配合我们按照下面的次序来进行:

1-ModelDoc.ClearSelection2 ‘取消所有选择

2-选择需要配合的实体(entity)

3-使用AddMate2函数进行配合

4-再次使用 ModelDoc.ClearSelection2 ‘取消所有选择

主要的问题在于如何选择合适的面:

由于面的命名没有什么规律,很多时候是程序自动来命名的,这样,不方便使用selectbyID来选择,我也不想使用坐标值来选择一个面,那样做更加糟糕。

在得到一个组件(component)或者一个特征(feature)时,我们有getfaces、getfirstface、getnextface等方法,我们可以使用这些方法遍历一个组件或特征等的各个面,来达到选择面的目的,看下面程序:

Private Function selectface(dcom As SldWorks.Component2, tp As Integer) As Boolean

Set swdowelbody = dcom.GetBody()

If swdowelbody Is Nothing Then '错误处理

MsgBox '选择零件失败'

selectface = False

Exit Function

End If

Set swDCface = swdowelbody.GetFirstFace ‘得到第一个面

Do While Not swDCface Is Nothing ‘遍历各个面

Set swDsurface = swDCface.GetSurface ‘得到表面对象

If swDsurface.IsCylinder Then ‘如果是圆柱面

If tp = 0 Then 'means cylinder

Set swDEnt = swDCface

swDEnt.Select4 True, selDdata

selectface = True

Exit Function

End If

Else ‘如果是其它,当然实际中我们可能需要使用select来定义好多分支

If tp = 1 Then 'means plane

Set swDEnt = swDCface

swDEnt.Select4 True, selDdata

selectface = True

Exit Function

End If

End If

Set swDCface = swDCface.GetNextFace

Loop

End Function

此函数接受两个参数,第一个是一个component对象,第二个用来标识选择类型:0表示圆柱面,1表示平面。此函数运行完成后将选择指定组件的指定类型的一个面。需要注意的是我们需要在判断面类型时候需要转换到surface对象。而且选择需要定义一个entity对象,用来select4,达到选择的目的。可能这个过程有些复杂,大家按照这个顺序多测试几次,就明白了它的工作原理。

上面的函数写的并不好,是我从我的工程中截取的一段。

下面介绍一下addmate2函数:

Syntax (OLE Automation) OLE语法:

pMateObjOut = AssemblyDoc.AddMate2 ( mateTypeFromEnum, alignFromEnum, flip, distance, distAbsUpperLimit, distAbsLowerLimit, gearRatioNumerator, gearRatioDenominator, angle, angleAbsUpperLimit, angleAbsLowerLimit, errorStatus )

参数:

Input:

(long) mateTypeFromEnum

Type of mate as defined in swMateType_e

配合类型

Input:

(long) alignFromEnum

Type of alignment as defined in swMateAlign_e

对齐选项

Input:

(VARIANT_BOOL) flip

TRUE to flip the component, FALSE otherwise

是否翻转

Input:

(double) distance

Distance value to use with distance or limit mates

距离

Input:

(double) distAbsUpperLimit

Absolute maximum distance value (see Remarks)

距离限制max

Input:

(double) distAbsLowerLimit

Absolute minimum distance value (see Remarks)

距离限制min

Input:

(double) gearRatioNumerator

Gear ratio numerator value for gear mates

齿轮配合分子值

Input:

(double) gearRatioDenominator

Gear ratio denominator value for gear mates

齿轮配合分母值

Input:

(double) angle

Angle value to use with angle mates

角度

Input:

(double) angleAbsUpperLimit

Absolute maximum angle value

角度限制max

Input:

(double) angleAbsLowerLimit

Absolute minimum angle value

角度限制min

Output:

(long) errorStatus

Success or error as defined by swAddMateError_e

错误报告

Return:

(LPMATE2) pMateObjOut

Pointer to the Mate2 object

返回指向配合的指针

Remarks

To specify a distance mate without limits, set the distAbsUpperLimit and distAbsLowerLimit arguments equal to the distance argument's value.

指定一个没有限制的距离,设定距离限制的最大、最小值和距离值相等

If mateTypeFromEnum is swMateDISTANCE or swMateANGLE when the mate is applied to the closest position that meets the mate condition specified by distance or angle, then setting flip to TRUE moves the assembly to the other possible mate position.

如果是距离或角度配合,配合将从符合条件的最近端进行配合,我们可以设定flip为true,改变配合至另一个合适的位置

Use:使用配合的步骤

ModelDoc2::ClearSelection2(VARIANT_TRUE) before selecting entities to mate.

ModelDocExtension::SelectByID2 with Mark = 1 to select entities to mate.

ModelDoc2::ClearSelection2(VARIANT_TRUE) after the mate is created.

If mateTypeFromEnum is swMateCAMFOLLOWER, then use a selection mark of 8 for the cam-follower face.

如果配合类型为 凸轮,在表面标示8. 注:这个我也不太明白哈哈

If nothing is preselected, then errorStatus is swAddMateError_IncorrectSeletions and pMateObjOut is NULL/Nothing.

如果实现没有限定实体来配合,将会抱错swAddMateError_IncorrectSeletions,函数返回NULL或者Nothing

上面就是API帮助所说的话,下面给出一段示例程序,假设之前我们已经选择了两个半径一样的圆柱面,那么我们来定义一个同心配合:

Set swmatefeat = swassy.AddMate2(1, 0, False, 0, 0, 0, 0, 0, 0, 0, 0, nErrors)

其中的 Dim swassy As SldWorks.AssemblyDoc

Dim swmatefeat As Object

注:在编程中有时候不能实现确定一个对象的类型,我们可以声明一个Object对象,让VB自己去匹配。但这样做是影响了效率。

要完成一个距离或者角度要麻烦一些,就像上面的remark中说明的:

Set swmatefeat = swassy.AddMate2(5, 1, True, 0.001, 0.001, 0.001, 0, 0, 0, 0, 0, nErrors)

在这里我们需要将min和max都设置成与距离值相等,要不然配合会认为我们设定了高级配合中的限制条件,会报错。并且第三个参数和第二个参数需要按实际情况来确定。

最后我们列出AddMate2的类型:

swMateType_e

‘Specifies values for assembly-mate information.

swMateCOINCIDENT 0 重合

swMateCONCENTRIC 1 同心

swMatePERPENDICULAR 2 垂直

swMatePARALLEL 3 平行

swMateTANGENT 4 相切

swMateDISTANCE 5 距离

swMateANGLE 6 角度

swMateUNKNOWN 7 未知

swMateSYMMETRIC 8 对称

swMateCAMFOLLOWER 9 凸轮

swMateGEAR 10 齿轮

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
2023年上半年GDP全球前十五强
 百态   2023-10-24
美众议院议长启动对拜登的弹劾调查
 百态   2023-09-13
上海、济南、武汉等多地出现不明坠落物
 探索   2023-09-06
印度或要将国名改为“巴拉特”
 百态   2023-09-06
男子为女友送行,买票不登机被捕
 百态   2023-08-20
手机地震预警功能怎么开?
 干货   2023-08-06
女子4年卖2套房花700多万做美容:不但没变美脸,面部还出现变形
 百态   2023-08-04
住户一楼被水淹 还冲来8头猪
 百态   2023-07-31
女子体内爬出大量瓜子状活虫
 百态   2023-07-25
地球连续35年收到神秘规律性信号,网友:不要回答!
 探索   2023-07-21
全球镓价格本周大涨27%
 探索   2023-07-09
钱都流向了那些不缺钱的人,苦都留给了能吃苦的人
 探索   2023-07-02
倩女手游刀客魅者强控制(强混乱强眩晕强睡眠)和对应控制抗性的关系
 百态   2020-08-20
美国5月9日最新疫情:美国确诊人数突破131万
 百态   2020-05-09
荷兰政府宣布将集体辞职
 干货   2020-04-30
倩女幽魂手游师徒任务情义春秋猜成语答案逍遥观:鹏程万里
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案神机营:射石饮羽
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案昆仑山:拔刀相助
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案天工阁:鬼斧神工
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案丝路古道:单枪匹马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:与虎谋皮
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:李代桃僵
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案镇郊荒野:指鹿为马
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:小鸟依人
 干货   2019-11-12
倩女幽魂手游师徒任务情义春秋猜成语答案金陵:千金买邻
 干货   2019-11-12
 
推荐阅读
 
 
 
>>返回首頁<<
 
靜靜地坐在廢墟上,四周的荒凉一望無際,忽然覺得,淒涼也很美
© 2005- 王朝網路 版權所有