几何尺寸与公差论坛------致力于产品几何量公差标准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)
-   ObjectARX(AutoLISP) (http://www.dimcax.com/hust/forumdisplay.php?f=178)
-   -   不使用insert怎么插入块? (http://www.dimcax.com/hust/showthread.php?t=11504)

yang686526 2009-04-26 04:21 PM

不使用insert怎么插入块?
 
不使用insert怎么插入块?
www.dimcax.com
不使用insert怎么插入块?使用insert批量插入块的时候,效率和速度都太低了,想问一下,有没有其它的插入块的方法?
d
(vl-load-com)
(setq app(vlax-get-acad-object))
(setq doc(vla-get-activedocument app))
(setq mspace(vla-get-modelspace doc))
(vla-insertblock mspace (vlax-3d-point '(0 0 0)) "你的块名称" 1 1 1 0)
d
如果只用autolisp的方法呢?
d
(setq bn "块名" pt '(0 0 0))
(entmake (list '(0 . "insert") (cons 2 bn)(cons 10 pt)))
d
谢谢版主gg
d


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