查看单个帖子
旧 2009-04-13, 12:53 PM   #1
yang686526
高级会员
 
注册日期: 06-11
帖子: 14579
精华: 1
现金: 224494 标准币
资产: 234494 标准币
yang686526 向着好的方向发展
默认 【转帖】modify custom properties in a part from drawing

modify custom properties in a part from drawing
hi,
i would like to change one of my custom properties by a macro from a drawing and i don't know how ! any idea ?
thanks,
steph
there are several macros that will allow you to do this. check out
hi stephane,
this is the code i wrote to get the referenced part in a drawing. once you have the part reference you can get at the properties inside that part.
function getmodelfromdrawing(swdraw as drawingdoc) as modeldoc2
'gets the model reference from a drawingdoc
'daniel fortin cc
dim aboolstatus as boolean
dim swselmgr as selectionmgr
dim swsheet as sheet
dim swview as view
dim swapp as sldworks.sldworks
set swapp = application.sldworks
set swselmgr = swdraw.selectionmanager
set swsheet = swdraw.getcurrentsheet
aboolstatus = swdraw.extension.selectbyid2(swsheet.custompropertyview, "drawingview", 0, 0, 0, false, 0, nothing, swselectoptiondefault)
if aboolstatus <> false then
set swview = swselmgr.getselectedobject6(1, -1)
else
set swview = swdraw.getfirstview
set swview = swview.getnextview
end if
set swmodel = swapp.opendoc(swview.getreferencedmodelname, swtypeoffile(swview.getreferencedmodelname))
set getmodelfromdrawing = swmodel
end function
make sure to do a
swdraw.editrebuild
after updating the properties to get the new properties to show up on the drawing!
edited: 04/21/2008 at 07:16 pm by daniel fortin
quick
yang686526离线中   回复时引用此帖
GDT自动化论坛(仅游客可见)