快速选择所有相同色值的线

277283904

选择一条线，然后按这条线的色值快速选择所有相同色值的线

ssyfeng

应该跟这个差不多

277283904

ssyfeng 发表于 2024-2-23 09:19
应该跟这个差不多

试了一下，选择不了所有红色呢

ssyfeng

肯定是有的

277283904

ssyfeng 发表于 2024-2-23 09:41
肯定是有的

不是按tt键吗，没反应

277283904

ssyfeng 发表于 2024-2-23 09:41
肯定是有的

明白了，还要全选，还有更简洁的吗

夏生生

277283904 发表于 2024-2-23 10:03
明白了，还要全选，还有更简洁的吗

1. (defun c:tt  (/ en)
   
2.     (setq en (car (entsel "\n选择色非随层图元:")))
   
3.     (if        (setq en (assoc 62 (entget en)))
   
4.         (sssetfirst nil (ssget "x" (list en)))
   
5.         (alert "色随层")))

(defun c:tt  (/ en)<br />     (setq en (car (entsel "\n选择色非随层图元:")))<br />     (if        (setq en (assoc 62 (entget en)))<br />         (sssetfirst nil (ssget "x" (list en)))<br />         (alert "色随层")))

wangsr

ssyfeng 发表于 2024-2-23 09:19
应该跟这个差不多

您好
我的2023怎么输入TT后显示
未知命令“TT”。按 F1 查看帮助。

277283904

夏生生 发表于 2024-2-23 10:20

这个简洁一点，谢谢！