通过命令行删除 Mviews
如何在用户使用鼠标选择的情况下通过命令行擦除/删除当前布局选项卡上的视口?**** Hidden Message ***** 视图,选择命名视图,删除? 有没有办法键入(*),因为我不知道mview的名称是什么? QSelect (ssget “x” '((0 .“视口”)))(命令 “.擦除“ ”p“ ”“) 非常感谢!
(defun c:vpdelc nil
(if (ssget "_x" (list '(0 . "VIEWPORT") (cons 410 (getvar 'ctab))))
(command "_erase" "p" "" "")
)
)
这似乎有点危险,因为这会删除所有?“全部删除”的目的是什么? 我试图让它只删除当前选项卡上的mview。
好了,四月一日就要到了……一定有一些随机的插科打诨
页:
[1]