[求助]在LSP中如何去XREF路径

npu349

要插入外部参照块

(commadn "xref" path  pt sca "" 0)

但这里面包含完整路径，要把它改为无路径，怎么实现？找了半天没发现相关系统参数，只知道CAD有个xattach命令，是可以实现无路径插入的。望高手指点下，谢谢

QQ28104323

建议用insert命令

npu349

我要插入的是外部参照。。就是在CAD不能炸开的那种，，，用INSERT不行的啊。。。

bios

我也很困扰这个问题。不知道怎么办好

Gu_xl

多重引用插入，就不可以炸开了！

3. (defun gxl-MkMINSERT (bname ins-pt)
4.   (entmake (list
5.       '(0 . "INSERT")
6.        ;'(100 . "AcDbEntity")
7.       (cons 2 bname)
8.       '(100 . "AcDbMInsertBlock")
9.       (cons 10 ins-pt)
10.       '(41 . 1.0);XScale
11.       '(42 . 1.0);YScale
12.       '(43 . 1.0);ZScale
13.       '(50 . 0.0);Rotate
14.       '(70 . 1);Column count (optional; default = 1)
15.       '(71 . 1);Row count (optional; default = 1)
16.       '(44 . 0.0);Column spacing (optional; default = 0)
17.       '(45 . 0.0);Row spacing (optional; default = 0)
18.     ) ;_ 结束list
19.   ) ;_ 结束entmake
20. )

(defun gxl-MkMINSERT (bname ins-pt)   (entmake (list       '(0 . "INSERT")        ;'(100 . "AcDbEntity")       (cons 2 bname)       '(100 . "AcDbMInsertBlock")       (cons 10 ins-pt)       '(41 . 1.0);XScale       '(42 . 1.0);YScale       '(43 . 1.0);ZScale       '(50 . 0.0);Rotate       '(70 . 1);Column count (optional; default = 1)       '(71 . 1);Row count (optional; default = 1)       '(44 . 0.0);Column spacing (optional; default = 0)       '(45 . 0.0);Row spacing (optional; default = 0)     ) ;_ 结束list   ) ;_ 结束entmake )