关于如何循环打开、关闭面板的问题？

zilong136

如何把下面两个代码合并一起？开关循环控制。

• ;;;1.图形修复管理器【drawingrecovery】--g1
• (defun c:gg1 ()
•   (vl-cmdf "drawingrecovery")
•   (prompt " n\ gg1:图形修复管理器")
•   (princ)
• )
• ;;;2.打开图层特性管理器【Layer】--g2
• (defun c:gg2 ()
•   (initdia)(vl-cmdf "Layer")
•   (prompt "\n gg2:打开图层特性管理器")
•   (princ)
• )
  

Bao_lai

刚好这个之前也有过同样的需求：
1.暂不知
2.图层特性管理器
(if(= 1(getvar "layermanagerstate")) (command "'_layerclose") (command "layerpalette"))

zilong136

Bao_lai 发表于 2024-3-28 12:09
刚好这个之前也有过同样的需求：
1.暂不知
2.图层特性管理器

亲测可用，是不是遇到类似的管理器面板都可以用这种方法解决？

刘大叔

zilong136 发表于 2024-3-29 02:04
被你发现了

原来你也有不懂的问题啊，哈哈哈哈哈哈哈哈哈~
赶紧来教我怎么做自己专用的加密图库！

Bao_lai

上面的1是这个：DRSTATE，应该是这个道理。

刘大叔

楼主是天正的？？？

zilong136

刘大叔 发表于 2024-3-28 18:47
楼主是天正的？？？

被你发现了

zilong136

刘大叔 发表于 2024-3-29 08:11
原来你也有不懂的问题啊，哈哈哈哈哈哈哈哈哈~
赶紧来教我怎么做自己专用的加密图库！

我太难了

刘大叔

zilong136 发表于 2024-3-29 15:46
我太难了

我帮你卖商业版~快点儿~

Bao_lai

刘大叔 发表于 2024-3-28 18:47
楼主是天正的？？？

其实我也是，没发现吧。