关于视口的问题
(defun C:skwz ( ) ;更改视口位置(setq en1 (entsel "选择视口"))
(setq en1_data (entget (car en1)))
(setq oldr (assoc 12 en1_data))
(setq aoldr (cdr oldr))
(setq y(+(car aoldr) 1000 ))
(setq x(+(cadr aoldr) 1000))
(setq z(caddr aoldr) )
(setq ab12 (list 12 y x z))
(setq en1_data (subst ab12 oldr en1_data))
(entmoden1_data)
)
(princ "\skwz 改变视口显示位置")
---------------------------------------------------------------------------
想直接更改视口显示的位置,如上代码,可返回nil,不晓得哪里有问题,有哪位高手麻烦指导一下
entmod 不能用于 viewport 的修改(帮助文档中说了这个)。 那么请问如果需要修改视口显示的位置,可采用什么办法呢? 重新建个视口 用MATCHPROP 刷一下,旧的删掉 最简单的办法 就是move命令啊 直接移动就行了 同意楼上,move 最简单。
不想用command命令,也是可以试试vla-put-center。
页:
[1]