aws 发表于 2023-12-9 00:36:49

这里应该怎么写？ssget用法

(defun c:gg()
        (setq en(car(entsel "\n选取初始颜色：")))
        (setq e(entget en))


       
        (setq ss(ssget '((assoc 62 e))))


       
        (sssetfirst ss ss)
        (princ)
)

上面标红部分，报错了，但是我没想明白错在哪里，请教下大家

fangmin723 发表于 2023-12-9 08:14:11

本帖最后由 fangmin723 于 2023-12-9 08:18 编辑

(setq ss (ssget (list (assoc 62 e))))
具体原因参考：
单引号和quote是不同的
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=181876&fromuid=7316343
(出处: 明经CAD社区)

烟花丝雨 发表于 2023-12-9 08:16:42


[*](setq ss(ssget (list (assoc 62 e))))

aws 发表于 2023-12-9 09:12:39

烟花丝雨 发表于 2023-12-9 08:16
[*](setq ss(ssget (list (assoc 62 e))))

谢谢，一目了然

aws 发表于 2023-12-9 09:17:12

fangmin723 发表于 2023-12-9 08:14
(setq ss (ssget (list (assoc 62 e))))
具体原因参考：
单引号和quote是不同的


感谢回复！对 ' 的认识又深刻了

oistre 发表于 2023-12-9 11:04:21

{:1_1:}认识又深刻

renxianjing 发表于 2023-12-9 15:39:38

用 ' 不对后面的表求值。
页: [1]
查看完整版本: 这里应该怎么写？ssget用法