在图层列表中搜索

BlackBox · 发表于 2022-7-6 10:49:06

你说得太好了。

许多有经验的开发人员更喜欢具有参数依赖关系的函数。在这种情况下，我*假设*用户可能会发现输入简单命令更可取。

两者之间的主要区别在于vl字符串搜索与wcmatch的使用。使用wcmatch时，需要添加通配符，而vl字符串搜索则不需要。

总的来说，干得好Jammie。

Sweety · 发表于 2022-7-6 10:53:06

非常棒的作品，伦德曼先生。谢谢你为我做的一切。

你真的很棒。

非常感谢你。

Sweety · 发表于 2022-7-6 10:57:46

代码的精彩组合Jammie。

非常感谢。

非常感谢你

BlackBox · 发表于 2022-7-6 10:59:46

呃，我很无聊。。。不客气。英雄联盟

Lee Mac · 发表于 2022-7-6 11:02:44

香草味

copy


(defun SearchLayerDescription ( pattern / def l n )
 ;; © Lee Mac 2010
 (reverse
   (while
     (setq def
       (tblnext "LAYER"
         (null def)
       )
     )
     (foreach entry
       (cdadr
         (assoc -3
           (entget
             (tblobjname "LAYER"
               (setq n
                 (cdr
                   (assoc 2 def)
                 )
               )
             )
             '("AcAecLayerStandard")
           )
         )
       )
       (if
         (and (= 1000 (car entry))
           (wcmatch (cdr entry) pattern)
           (not (member n l))
         )
         (setq l (cons n l))
       )
     )
     l
   )
 )
)