两个小程序怎么没有反应 大家瞧瞧

YueFeng

1. (vlax-vla-object->ename (vlax-safearray-get-element (vlax-variant-value (vla-Offset (vlax-ename->vla-object en) lc)) 0))

复制代码

en 为图元名
lc  为偏移值有正负之分，可以不指定偏移方向。
返回值为偏移后的对象图元名。不需要返回值可以直接

1. (vla-Offset (vlax-ename->vla-object en) lc))

(vla-Offset (vlax-ename->vla-object en) lc))

如：

1. (vla-Offset (vlax-ename->vla-object (car (entsel))) 20)

(vla-Offset (vlax-ename->vla-object (car (entsel))) 20)

飞雪神光

第一个 没有赋值i 两个的 OFFSET 的命令流我在07上测试不对

YueFeng

没有指定偏移方向