关于 _insertobj 如何实现批量插入对象

暗夜贵族

rt，调用command 总是跳出对话框

lucas_3333

http://bbs.mjtd.com/forum.php?mo ... amp;fromuid=7303840

暗夜贵族

lucas_3333 发表于 2015-12-25 19:03
http://bbs.mjtd.com/forum.php?mod=redirect&goto=findpost&ptid=169678&pid=748710&fromuid=7303840

(COMMAND "-INSERTOBJ" PAUSE)
没有-INSERTOBJ 这个指令

lucas_3333

暗夜贵族 发表于 2015-12-25 19:08
(COMMAND "-INSERTOBJ" PAUSE)
没有-INSERTOBJ 这个指令

要知道并不是所有命令都能去掉对话框

暗夜贵族

lucas_3333 发表于 2015-12-25 19:27
要知道并不是所有命令都能去掉对话框

vba 或者别的方法能实现吗

lucas_3333

暗夜贵族 发表于 2015-12-25 19:30
vba 或者别的方法能实现吗

insert block 有VLA方法,

1.     (setq insertionPnt (vlax-3d-point 2 2 0))
   
2.     (setq modelSpace (vla-get-ModelSpace doc))
   
3.     (setq blockRefObj1 (vla-InsertBlock modelSpace insertionPnt "TEST" 1 1 1 0))

    (setq insertionPnt (vlax-3d-point 2 2 0))<br />     (setq modelSpace (vla-get-ModelSpace doc))<br />     (setq blockRefObj1 (vla-InsertBlock modelSpace insertionPnt "TEST" 1 1 1 0))

但insert object 貌似没有办法