社区 › AutoLISP/Visual LISP 编程技术 › 取之于明，二次开发学习记录帖

foolishzy 发表于 2022-4-25 21:27:59

取之于明，二次开发学习记录帖

在明经通道收获颇多，记录一些简单的小功能，一起进步

liwen888888 发表于 2022-4-25 21:42:17

没有实际的东西啊！

foolishzy 发表于 2022-4-25 22:53:19

本帖最后由 foolishzy 于 2022-4-25 22:54 编辑


选择集 list 互相转换
(defun enamelist_to_pickset(sslst / ss)
      ;list 转换成选择集
      (setq ss (ssadd))
      (foreach n sslst
                (ssadd n ss)
      )
      ss
)
(defun pickset_to_enamelist(pickset / ss sslst )
      ;选择集转换成list
      (setq ss pickset sslst '())
      (while (setq n (ssname ss 0))
                (progn
                        (setq sslst (append sslst (list n)))
                        (ssdel n ss)
                )
      )
      sslst
)

vitalgg 发表于 2022-4-26 05:15:49

zmzk 发表于 2024-12-2 13:18:45

foolishzy 发表于 2022-4-25 22:53
选择集 list 互相转换

楼主，有没有示例，如何用？

查看完整版本: 取之于明，二次开发学习记录帖