请问GU版这个函数怎么用

小师傅

我在论坛上找到了这个函数，请问怎样使用这个函数，谁能给我一个实例，谢谢

• ;;关闭/打开所有前缀图层，参数 prefix = 前缀字串 flag = t 打开图层 = nil 关闭图层
  
• (defun prefixlayeron (prefix flag)
  
•   (if flag
  
•     (setq flag :vlax-true) ;_ 打开图层
  
•     (setq flag :vlax-false) ;_ 关闭图层
  
•     )
  
•   (setq prefix (strcase prefix))
  
•   (vlax-for lay        (vla-get-layers
  
•                   (vla-get-ActiveDocument (vlax-get-acad-object))
  
•                 )
  
•     (if        (WCMATCH (strcase (vla-get-name lay)) (strcat prefix "*"))
  
•       (vla-put-layeron lay flag)
  
•     )
  
•   )
  
• )
  
  

fl202

打开图层含"a123"前缀的图层，或者关闭。
(prefixlayeron   "a123"  t)
(prefixlayeron   "a123"  nil)

小师傅

fl202 发表于 2016-4-25 09:35
打开图层含"a123"前缀的图层，或者关闭。
(prefixlayeron   "a123"  t)
(prefixlayeron   "a123"  nil)

大侠，我就是这样用的，可是不成功呀

小师傅

fl202 发表于 2016-4-25 09:35
打开图层含"a123"前缀的图层，或者关闭。
(prefixlayeron   "a123"  t)
(prefixlayeron   "a123"  nil)

大侠，我就是这样用的，可是不成功呀

xiaolong1487

(vl-load-com)有没有加载

小师傅

xiaolong1487 发表于 2016-4-25 11:48
(vl-load-com)有没有加载

我加载了，总是不成功

xiaolong1487

小师傅 发表于 2016-4-25 14:59
我加载了，总是不成功

可以用，我刚试了，你装的是精简版的CAD吗？如果是就有问题！