本帖最后由 作者 于 2008-11-11 11:52:35 编辑
无痕版主,你说的矩阵旋转是直接旋转坐标吗?这个我真不会,求指教。 下面是旋转对象的 (if (= (getvar "ucsname") "") (command "_.ucs" "_na" "_s" "$tempucs$");;临时命名当前UCS ) (vla-transformby (vlax-ename->vla-object ENAME);;矩阵旋转,ENAME是图元 (vla-GetUCSMatrix (vla-get-ActiveUCS (vla-get-activedocument (vlax-get-acad-object)))) ) ;;求值操作(如 getboundingbox),得到数据后,UNDO回去,删除命名的UCS名 |