几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量  


返回   几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 » 仿射空间:CAX软件开发(三)二次开发与程序设计 » CAD二次开发 » SolidWorks二次开发
用户名
密码
注册 帮助 会员 日历 银行 搜索 今日新帖 标记论坛为已读


回复
 
主题工具 搜索本主题 显示模式
旧 2009-04-12, 09:57 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】open the equation manager of a componen

open the equation manager of a component
hi!
i have created an assembly and i'm editing all the parts to have their equations, so first i have to open their equation managers.
i have tried with this code but it opens the equation manager of the modeldoc (=of the assembly):
dim swapp as sldworks.sldworks
dim swmodel as sldworks.modeldoc2
dim sweqnmgr as sldworks.equationmgr
dim swdim as sldworks.dimension
set swapp = createobject("sldworks.application")
set swmodel = swapp.activedoc
set sweqnmgr = swmodel.getequationmgr
dim ncount as integer, i as integer, ipos as integer
dim a as string
ncount = sweqnmgr.getcount
for i = 0 to ncount - 1
a = sweqnmgr.equation(i)
set swdim = swmodel.parameter(a)
cells(k, 3) = swdim.fullname
the problem is that i active the modeldoc and i have to active the component, so i turn the component into a modeldoc but it doesn´t work:
.....
dim c as sldworks.modeldoc2
set c = swcomp.getmodeldoc
set swdim = swmodel.parameter(b)
cells(k, 3) = swdim.fullname
can you help me?
thanks a lot!
i don't see where you get the equation manager for the component's document. did you just miss posting it? you at least need something like
dim c as sldworks.modeldoc2
set c = swcomp.getmodeldoc
set a = c.getequationmgr
i'll get you eh steve, if it's the last thing i dooooo!
thank you josh, you´re right!
i have done like this and it works:
dim swapp as sldworks.sldworks
dim swmodel as sldworks.modeldoc2
dim swassy as sldworks.assemblydoc
dim swchildcomp as sldworks.component2
dim vchildcomp as variant
dim sweqnmgr as sldworks.equationmgr
dim swdim as sldworks.dimension
dim c as sldworks.modeldoc2
set swapp = createobject("sldworks.application")
set swmodel = swapp.activedoc
set swassy = swmodel
dim a as boolean
dim i as integer
dim ncount as integer, j as integer
dim a as string
vchildcomp = swassy.getcomponents(false)
for i = 0 to ubound(vchildcomp)
set swchildcomp = vchildcomp(i)
a = swchildcomp.select3(true, nothing)
swmodel.editpart
set c = swcomp.getmodeldoc 'component --> modeldoc
set sweqnmgr = c.getequationmgr
ncount = sweqnmgr.getcount
for j = 0 to ncount - 1
a = sweqnmgr.equation(i)
set swdim = c.parameter(a)
cells(k, 3) = swdim.fullname
quick
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)
回复


主题工具 搜索本主题
搜索本主题:

高级搜索
显示模式

发帖规则
不可以发表新主题
不可以回复主题
不可以上传附件
不可以编辑您的帖子

vB 代码开启
[IMG]代码开启
HTML代码关闭

相似的主题
主题 主题发起者 论坛 回复 最后发表
【转帖】journal manager yang686526 SolidWorks二次开发 0 2009-04-12 09:32 PM


所有的时间均为北京时间。 现在的时间是 05:44 PM.


于2004年创办,几何尺寸与公差论坛"致力于产品几何量公差标准GD&T | GPS研究/CAD设计/CAM加工/CMM测量"。免责声明:论坛严禁发布色情反动言论及有关违反国家法律法规内容!情节严重者提供其IP,并配合相关部门进行严厉查处,若內容有涉及侵权,请立即联系我们QQ:44671734。注:此论坛须管理员验证方可发帖。
沪ICP备06057009号-2
更多