层操作开始、结束
本帖最后由 /db_自贡黄明儒_ 于 2016-8-23 14:06 编辑仿照编组的开始与结束,写了个层操作开始、结束
;;编组开始;(command "_.undo" "be")
(defun _StartUndo (*DOC*)
(_EndUndo *DOC*)
(vla-StartUndoMark *DOC*)
)
;;结束编组;(if (= 8 (logand (getvar "undoctl") 8)) (command "_.undo" "_e"))
(defun _EndUndo (*DOC*)
(if (= 8 (logand 8 (getvar 'UNDOCTL)))
(vla-EndUndoMark *DOC*)
)
)
;;1.2解冻 解锁 所有图层
**** Hidden Message ***** 学习一下看看
学习学习,good
感谢黄大师分享程序 看看怎么用
看看一看》》》》》》》》》》》
学习学习,good 什么叫做“ 层操作开始、结束” 要记录什么?? (layerstate-save layerstatename mask viewport)
... your layer operation
(layerstate-restore layerstatename viewport)
(layerstate-delete layerstatename)
看一看》》》》 不错,学习学习 看看怎么用
如何列出所有关闭和冻结的图层? see the hidden content