品茗新秀 发表于 2012-9-27 00:10:25

求指定图层凸显或亮显程序及关闭凸显程序

求指定图层凸显或亮显程序及关闭凸显程序

Gu_xl 发表于 2012-9-27 00:10:26


;;打开亮显
(defun c:dktx ()
(if (setq e (car(entsel "\n选择要亮显的图层对象")))
    (progn
      (setq s (ssget "x" (list (assoc 8 (entget e)))))
      (repeat (setq n (sslength s))
        (redraw (ssname s (setq n (1- n))) 3)
        )
      )
    )
(princ)
)
;;关闭亮显
(defun c:gbtx ()
(if (setq e (car(entsel "\n选择要恢复亮显的图层对象")))
    (progn
      (setq s (ssget "x" (list (assoc 8 (entget e)))))
      (repeat (setq n (sslength s))
        (redraw (ssname s (setq n (1- n))) 4)
        )
      )
    )
(princ)
)

lizhiqiang9801 发表于 2012-11-6 13:59:41

我试了一下 图层是选定状态 没有亮显呢 不知道版主能修改一下吗

sky899150 发表于 2022-3-16 16:37:44

Gu_xl 发表于 2012-9-27 00:10


被选图层亮显，然后非选图层能不能变成灰色呢？ 这样更凸显被选中的图层，便于查看
页: [1]
查看完整版本: 求指定图层凸显或亮显程序及关闭凸显程序