明经通道 AutoLISP 函数	明经通道 AutoLISP 函数
acet-layerp-mark

放置图层先前记录的开始和结束标记

(acet-layerp-mark [status])

acet-layerp-mark 函数允许用户将多个图层命令组合成单个操作以便可以使用 LAYERP 一次性撤消。 LAYERPMODE 必须打开才可设置标记。

参数

status

指定 T 以设置开始标记。指定 nil 以设置结束标记，并清除开始标记。

如果忽略 status ， acet-layerp-mark r返回图形设置的当前标记状态。

返回值

如果开始标记有效，则返回 T ；否则返回 nil。

示例

以下代码更改图层 0 为蓝色，然后在进行其它一些图层更改的前后设置了开始和结束标记。如果在运行这些代码后执行 LAYERP，图层 0 将依然是蓝色。

(defun TestLayerP ()

  ;; 如果 LAYERPMODE 不存在，则打开它

  (if (not (acet-layerp-mode))

    (acet-layerp-mode T)

  )

  ;; 设置图层 0 的颜色为蓝色

  (command "_.layer" "_color" "blue" "0" "")

  ;; 设置开始标记

  (acet-layerp-mark T)

  ;; 发出一系列图层命令，然后再设置结束标记

  (command "_.layer" "_color" "green" "0" "")

  (command "_.layer" "_thaw" "*" "")

  (command "_.layer" "_unlock" "*" "")

  (command "_.layer" "_ltype" "hidden" "0" "")

  (command "_.layer" "_color" "red" "0" "")

  ;; 设置结束标记

  (acet-layerp-mark nil)

)

参阅

《命令参考》的 LAYERP 命令。