rlx 发表于 2022-7-5 20:31:28

也许这对你有用？
 
rlx公司
标签LSP

Tharwat 发表于 2022-7-5 20:35:48

 
如果您感兴趣，可以选择。
 

(if (vl-some '(lambda (i r) (and (or (eq n i) (eq n (itoa i))) (setq v r)))
            '(0 1 2 3 4 5 6 7 8 9 256)
            '("ByBlock" "1 (Red)" "2 (Yellow)" "3 (Green)" "4 (Cyan)" "5 (Blue)"
                "6 (Magenta)" "7 (Blk/Wht)" "8 (D.Gray)" "9 (L.Gray)" "ByLayer"
                )
   )
v
(setq v n)
)

rlx 发表于 2022-7-5 20:41:10

我在autocad中编写了很多小的和一些大的例程，有些可以追溯到很久以前，你知道。。。有些是我重写的，有些是我需要的时候才重写的（因为有时候我很懒哈哈），但是对于更新，我会使用thanx
 
 
grtz rlx
页: 1 [2]
查看完整版本: 标记变量问题