[编程申请]：新建图层问题

flh1314 · 发表于 2006-6-20 08:51:39

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

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

×

用LSP新建图层,如该图层已经存在,则继续运行直至完成整个命令(因为图层这个我是要镶在程序内).如果不存在则新建.

比如画一个REC,要求画完后置于"S-WLD-SYM"层,但该层在每一幅图中,不一定都存在.

我现在做出来的,就是层不存在的时候可以完成命令,而有这一个层的时候命令就中断了.非常不爽,希望能有高手指教指教.

Underway · 发表于 2006-6-20 09:57:13

Command: (TblSearch "Layer" "S-WLD-SYM")
nil

Command: (TblSearch "Layer" "0")
((0 . "LAYER") (2 . "0") (70 . 0) (62 . 254) (6 . "CONTINUOUS"))

flh1314 · 发表于 2006-6-20 10:02:10

能解释下吗？因为我是新学这个，有点看不明白。

Underway · 发表于 2006-6-20 11:29:51

如果不存在则新建:
(TblSearch "Layer" "S-WLD-SYM")
nil ==> 不存在

(if (TblSearch "Layer" "S-WLD-SYM")
(略过)
(不存在则新建)
)

flh1314 · 发表于 2006-6-20 11:46:10

试过了，可行。多谢！

再请问下，怎么样在LSP中选择多个图形（当前DWG文件），并更改它们的层？

Underway · 发表于 2006-6-20 13:05:09

(command "chprop" ss "" "Layer" lyr "")

ss = 多个图形
lyr= 新的层名

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

[编程申请]：新建图层问题

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

相关帖子