50# lgmsddy
Dim block_body_tag As NXOpen.Tag
Dim cyl_body_tag As NXOpen.Tag
ufs.Modl.AskFeatBody(block_feat_tag, block_body_tag)
ufs.Modl.AskFeatBody(cyl_feat_tag, cyl_body_tag)
ufs.Modl.UniteBodies(block_body_tag, cyl_body_tag)
上面的代码就是做布尔加的,记得block_body_tag, cyl_body_tag 必须是body tag,而不是feat tag,函数ufs.Modl.AskFeatBody()就是把feat tag转化为body tag 的,关于free的问题你看一下哪个参数需要free,如果需要就free掉,有对应的函数的。。自己去找找 |