如何拾取三维多段线
大家好，我用以下代码创建了一条三维多段线：
(defun Bigal2(lst)
(setq x 0)
(command "_3dpoly")
(while (= (getvar "cmdactive") 1 )
(repeat (length lst)
(command (nth x lst))
(setq x (+ x 1))
)
)
)
(setq pl '((5 5 5) (10 5 4) (10 10 3) (5 10 2) (5 7 1) (5 5 5)))
然后，我尝试用以下行选择相同的内容：
（setq sel1（ssget’（（0“_3dpoly”）（8。“0”）））
它似乎不起作用。有什么问题吗？。
感谢BIGAL，他为“3dpoly”的创建提供了代码。 三维多段线图元的图元类型（DXF组0）为“多段线”，DXF组70中启用位代码8，以将图元与二维多段线或网格区分开来。
因此，您的选择过滤器需要：
'((0 . "POLYLINE") (8 . "0") (-4 . "&=") (70 . ) 非常感谢LM。它工作得很好。也许这就是我几天前开始的标题为“Poyline错误”的线程的解决方案。
页:
[1]