头大无恼 发表于 2018-5-6 10:45:12

如何用vla-get-Origin获得填充点的坐标!

(setq currOrigin (vla-get-Origin hatch_obj))
得到的是一个这样的东西,怎样转换成坐标点形式啊
#<variant 8197 ...>


谢谢
:handshake

头大无恼 发表于 2018-5-6 10:47:14

(vla-safearray->list (vla_variant_value 点对象))

头大无恼 发表于 2018-5-6 11:06:23

(setq currOrigin_pt (vlax-safearray->list (vlax-variant-value currOrigin)))搞定

pengfei2010 发表于 2018-5-7 08:48:26

vlisp中的 变体 需要转换为安全数组 再转换为表

taoyi0727 发表于 2018-5-7 09:14:37

(setq currOrigin (vla-get-Origin (vlax-ename->vla-object (car (nentsel)))))
(setq currOrigin_pt (vlax-safearray->list (vlax-variant-value currOrigin)))

只能得到填充原点坐标怎么能得到填充所有端点坐标

ketxu 发表于 2018-5-7 11:47:27

我总是使用 :
(vlax-get(vlax-ename->vla-object (car(entsel))) 'origin)
页: [1]
查看完整版本: 如何用vla-get-Origin获得填充点的坐标!