[求助]用lisp如何将LWPOLYLINE转换为line

gqh123456 · 发表于 2010-5-14 11:30:00

[求助]用lisp如何将LWPOLYLINE转换为line用explode命令只能用循环一个个单独炸开，且有“分解此多段线时丢失宽度信息。可用 UNDO 命令恢复。”的提示。
请教有没有其它lisp办法？

Andyhon · 发表于 2010-5-14 12:16:00

请上传该(*.dwg)作为调试之用

gqh123456 · 发表于 2010-5-14 14:18:00

比如附件图中的LWPOLYLINE，用一下程序只能做到一次炸开一根，不能批量炸开。且有“分解此多段线时丢失宽度信息。可用 UNDO 命令恢复。”的提示。(defun c:ttt()
(setq ss (ssget "X" (list (CONS 8 "砼墙")(cons 0 "LWPOLYLINE"))))
(command "EXPLODE" ss "")
)
而人工输入explode命令，输入!ss 选择集却能一次炸开。

gqh123456 · 发表于 2010-5-14 14:54:00

这是dwg文件

Andyhon · 发表于 2010-5-14 15:06:00

现成的参考:

http://www.google.com/search?as_q=&hl=zh-cn&num=10&btnG=Google+%E6%90%9C%E5%B0%8B&as_epq=%28command+%22EXPLODE%22+ss&as_oq=&as_eq=&lr=&cr=&as_ft=i&as_filetype=&as_qdr=all&as_occt=any&as_dt=i&as_sitesearch=http%3A%2F%2Fwww.mjtd.com%2Fbbs%2F&as_rights=&safe=images

gqh123456 · 发表于 2010-5-14 18:15:00

谢谢Andyhon

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

[求助]用lisp如何将LWPOLYLINE转换为line

本帖子中包含更多资源