选择集的转换

iceberg2509

如何将autolisp函数构建的选择集转换为vlisp函数能使用的选择集啊？

龙龙仔

3. (setq SS (ssget "X" '((0 . "LINE"))))
4. (setq SSOBJ (vla-get-activeselectionset
5.        (vla-get-activedocument (vlax-get-acad-object))
6.      )
7. )
8. (vla-highlight SSOBJ "true")
9. ;;注意:VLISP选集有一缺点,本论坛有讨论过...

(setq SS (ssget "X" '((0 . "LINE")))) (setq SSOBJ (vla-get-activeselectionset        (vla-get-activedocument (vlax-get-acad-object))      ) ) (vla-highlight SSOBJ "true") ;;注意:VLISP选集有一缺点,本论坛有讨论过...

iceberg2509

谢谢龙龙仔，回头试试看