[求助]如何获取端点坐标

sailorcwx

可以取
(vlax-safearray->list (vlax-variant-value (vla-getattributes (vlax-ename->vla-object (car (entsel))))))))返回的是一个表，不能直接用vla-get-textstring

sailorcwx

(vla-get-textstring (car(vlax-safearray->list (vlax-variant-value (vla-getattributes (vlax-ename->vla-object (car (entsel))))))))

sailorcwx

可以读，你检查一下你的程序有没有写错

(#<VLA-OBJECT IAcadAttributeReference2 15f55684> #<VLA-OBJECT
IAcadAttributeReference2 15f555ec>)是由#<VLA-OBJECT IAcadAttributeReference2 15f55684> 和#<VLA-OBJECTIAcadAttributeReference2 15f555ec>两个vla对象组成的表，IAcadAttributeReference2是对象类型，15f55684是对象编号。

sailorcwx

对象都给你找到了，还不容易吗

你可以把对象的属性提取出来，然后新建一个文字，把属性的相关属性赋给它就行了

写一个不完整的，可以用lisp,也可以用vlisp

(defun c:test()
  (vl-load-com)
  (setq acadapp (vlax-get-acad-object)
 acaddoc (vla-get-activedocument acadapp)
 acadspc (vla-get-modelspace acaddoc)
 )
  (setq atts (vlax-safearray->list (vlax-variant-value (vla-getattributes (vlax-ename->vla-object (car (entsel)))))))
  (foreach att atts
    (setq txt (vla-addtext acadspc (vla-get-textstring att)(vla-get-insertionpoint att)(vla-get-height att)))
    (vla-put-rotation txt (vla-get-rotation att))
    )
  )

luyu9635

是否试用于找任意曲线的端点列表