社区 › Auto Lisp › 在图层列表中搜索

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

香草味
 

(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
   )
)
)

Sweety 发表于 2022-7-6 11:06:32

谢谢李。我会试试的。
 
非常感谢你。

jammie 发表于 2022-7-6 11:10:17

 
谢谢你！尝试扩展我对Visual Lisp的知识，以便今天学到一些新东西
 
当做
 
杰米

jammie 发表于 2022-7-6 11:13:42

 
不麻烦，很乐意帮忙
 
快乐编码
 
当做
 
杰米

BlackBox 发表于 2022-7-6 11:15:16

 
 
... 欢迎来到“the pack”：狼：

alanjt 发表于 2022-7-6 11:17:16

巴斯的女朋友。。。汪

查看完整版本: 在图层列表中搜索