关于图层表的问题？

Smile cop · 发表于 2014-4-4 18:40:01

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

有什么简洁写法可以求出某一图层名表与当前图形中已存在的图层的交集？

newer · 发表于 2014-4-4 23:21:31

没看懂你要表达的，能准确说说吗？

st788796 · 发表于 2014-4-5 00:27:58

(vl-remove-if-not '(lambda (x) (tblsearch "layer" x)) lst)

Smile cop · 发表于 2014-4-5 11:20:47

st788796 发表于 2014-4-5 00:27
(vl-remove-if-not '(lambda (x) (tblsearch "layer" x)) lst)

To st788796 :
非常谢谢，还有其他思路的写法吗？

st788796 · 发表于 2014-4-5 11:21:33

rxing 发表于 2014-4-5 11:20
To st788796 :
非常谢谢，还有其他思路的写法吗？

你自己有什么思路?

Smile cop · 发表于 2014-4-5 11:35:37

st788796 发表于 2014-4-5 11:21
你自己有什么思路?

我这么写是要应用图层关闭功能：
......
  (setq lst (list "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" "PART"))
  (setq lst  (vl-remove-if-not '(lambda (x) (tblsearch "layer" x)) lst))
  (mapcar '(lambda(x) (command "_.layer" "off" x "")) lst)
......

可是这样有一个问题就是：当图形的当前层是lst中的一个时，会出现问题，不知道有什么好的方法？

st788796 · 发表于 2014-4-5 13:03:11

rxing 发表于 2014-4-5 11:35
我这么写是要应用图层关闭功能：
......
(setq lst (list "0" "1" "2" "3" "4" "5" "6" "7" "8" "9" ...

知道 clayer 变量吗？

Smile cop · 发表于 2014-4-5 13:08:18

st788796 发表于 2014-4-5 13:03
知道 clayer 变量吗？

知道这个，但是这么写也恐怕不行吧，有什么简单的写法不？

st788796 · 发表于 2014-4-5 13:12:06

(if (/= x (getvar "clayer"))
(command ".layer" "off" x "")
)

Smile cop · 发表于 2014-4-5 13:15:09

st788796 发表于 2014-4-5 13:12
(if (/= x (getvar "clayer"))
(command ".layer" "off" x "")
)

我知道你的意思，即分开处理图层关闭，但是这写法不精简啊，有其他的方法吗？

Lisper · 发表于 2014-4-5 13:28:04

rxing 发表于 2014-4-5 13:15
我知道你的意思，即分开处理图层关闭，但是这写法不精简啊，有其他的方法吗？

恐怕你还到不了追求代码精简的境界！达到目的就行了！

账号		自动登录	找回密码
密码			立即注册

[求助] 关于图层表的问题？

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评

点评

点评

点评

点评