如何获得图纸文挡中的外部参照。

chg

如何用vlisp的方法在程序中获得或添加外部参照。

在VBA中可以用Set insertedBlock = ThisDrawing.ModelSpace.AttachExternalReference(PathName, "XREF_IMAGE", InsertPoint, 1, 1, 1, 0, False)

来添加外部参照，用vlisp可以用什么方法呢？

alin

(command "-xref" "a" "c:\\alin\\ruler.dwg" '(0 0 0) 1 1 0)

chg

可能你没有明白我的意思，我不是要附着外部参照，而是用VLISP的方法得到一张图纸中的外部参照信息。在VBA和ACTIVEX中有介绍，而在VLISP中我不知道该如何得到externalreference这个属性。

ZZXXQQ

获得图中全部参照的选择集：

(SETQ SS (SSGET "X" '((0 . "INSERT") (100 . "AcDbBlockReference"))))

alin

(vla-attachexternalreference mspace pathname "XREF_IMAGE" InsertionPoint 1 1 1 0 :vlax-false)

flowerson

4楼 楼主 你那样会把属性块也选择了。