请问如何用entmake插入一个cad文件形式的块

peraperson

用 (entmake (list '(0 . "INSERT") (cons 2 name) (cons 10 pt)))只能插入图形里已经有的块，请问如何插入外部cad文件作为一个块？用（command "_insert"...)可以。 不知道用entmake如何实现 （比如我想插入的cad名为”test.dwg")
看了langs的‘entmake创建图元必要条件(慢慢更新)’帖子，是用第13条吗？是的话这里的ss应该是什么呢？

13、entmake生成普通块
(defun emkblk (ss pt name / i)
  (entmake (list '(0 . "block") (cons 2 name) '(70 . 0) (cons 10 pt)))
  (repeat (setq i (sslength ss))    (entmake (cdr (entget (ssname ss (setq i (1- i))))))  )
  (entmake '((0 . "ENDBLK")))
  (command "_.erase" ss "")
  (entmake (list '(0 . "INSERT") (cons 2 name) (cons 10 pt)))
)

xhq1954425

把下面的改一下就行
(command "_.insert" "D:/制图教学软件/程序用图/铣刀头装配关系演示.dwg" "0,0,0" "" "" "")

peraperson

xhq1954425 发表于 2014-6-11 11:12
把下面的改一下就行
(command "_.insert" "D:/制图教学软件/程序用图/铣刀头装配关系演示.dwg" "0,0,0" "" ...

谢谢 command的可以 我想知道entmake如何实现

edata

13中的ss是选择集，可以将选择的对象做成块。
对于entmake外部块，个人觉得用comand或vla插入更方便。
如果非要entmake，可以尝试DBX方式读取dwg文件，然后entmake 块，能不能实现也说不好，你有兴趣可以研究。

peraperson

edata 发表于 2014-6-11 11:30
13中的ss是选择集，可以将选择的对象做成块。
对于entmake外部块，个人觉得用comand或vla插入更方便。
如 ...

谢谢 主要是个人用惯了entmake 用command还得关捕捉 dbx不熟 我去看看 谢谢你

Gu_xl

peraperson 发表于 2014-6-11 13:53
谢谢 主要是个人用惯了entmake 用command还得关捕捉 dbx不熟 我去看看 谢谢你

直接用entmake是不可能的，除非你绕很大一个圈子，有必要吗?command关捕捉 ，都是程序自己完成，麻烦吗？

peraperson

Gu_xl 发表于 2014-6-11 18:39
直接用entmake是不可能的，除非你绕很大一个圈子，有必要吗?command关捕捉 ，都是程序自己完成，麻烦吗？

GU版说的是 还是改用command了