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

几何尺寸与公差论坛------致力于产品几何量公差标准GD&T (GDT:ASME)|New GPS(ISO)研究/CAD设计/CAM加工/CMM测量 (http://www.dimcax.com/hust/index.php)
-   SolidWorks二次开发 (http://www.dimcax.com/hust/forumdisplay.php?f=111)
-   -   【转帖】can you build a weld symbol with code (http://www.dimcax.com/hust/showthread.php?t=5141)

yang686526 2009-04-13 09:31 AM

【转帖】can you build a weld symbol with code
 
can you build a weld symbol with code?
can you build a weld symbol with code?
does anyone have a sample?
thanks
ok, this is what i have so far. it inserts the leader for weld but does not add the proper symbol. it also only adds the text to the top. i need to be able to control top and bottom text and symbols.
any ideas?
thanks
'______________________
option explicit
sub main()
dim swapp as sldworks.sldworks
dim part as modeldoc2
dim swmodel as sldworks.modeldoc2
dim swmodeldoc as sldworks.modeldocextension
dim swdrawdoc as sldworks.drawingdoc
dim retval as variant
dim dim1 as string
dim dim2 as string
set swapp = application.sldworks
set swmodel = swapp.activedoc
set swmodeldoc = swmodel.extension
set swdrawdoc = swmodel
set swapp = createobject("sldworks.application")
set part = swapp.activedoc
dim1 = ".25"
dim2 = ""
'retval = modeldoc2.insertweldsymbol3()
'void drawingdoc.insertweldsymbol(dim1, symbol, dim2, symmetric, fieldweld, showotherside, dashon
quick


所有的时间均为北京时间。 现在的时间是 08:14 AM.