(defun c:v()
(setq ipt (getpoint"Pick point:"))
(setq hgt "1")
(Command "insert" "*D:\\My Documents\\xk1.dwg"ipt hgt hgt"0")
(princ)
)
路径前面加*就是分解插入块
(defun c:v()
(setq ipt (getpoint"Pick point:"))
(setq hgt "1")
(Command "insert" "D:\\My Documents\\xk1.dwg"ipt hgt hgt"0")
(setq el (entlast) )
(Command "explode" el)
(princ)
) (defun c:v ()
(prompt "Pick point:")
(setq ipt (getpoint))
(setq hgt 1)
(Command "insert" "D:\\My Documents\\xk1.dwg" ipt hgt hgt 0 )
(setq el (entlast))
(Command "explode" el)
) 学习了,谢谢。 sen.sam 发表于 2012-7-9 19:54
(defun c:v()
(setq ipt (getpoint"Pick point:"))
(setq hgt "1")
又学一招 Andyhon 发表于 2012-7-9 20:43
(defun c:v ()
(prompt "Pick point:")
可以插入块时选择比例因子后再炸开吗? {:1_1:}学习一下
页:
[1]