giskumar 发表于 2022-7-6 06:59:43

未命名组的循环实体

大家好,
 
我的画中有一些未命名的分组。我能够获取GroupEntity,但我不清楚如何在不进行分解的情况下获取组的实体列表。
 
请告诉我怎么做。
 
当做
库马尔。

Lee Mac 发表于 2022-7-6 08:46:57

您可以迭代包含在VLA Group对象中的VLA对象,该对象可能来自图形中的Groups集合。
 
下面是一个示例来演示结构和层次结构:
(defun c:printgroups ( )
   (vlax-for group (vla-get-groups (vla-get-activedocument (vlax-get-acad-object)))
       (princ
         (strcat
               "\nGroup "   (vla-get-name group)
               " contains " (itoa (vla-get-count group)) " object(s):"
         )
       )
       (vlax-for obj group
         (princ (strcat "\n\t" (vla-get-objectname obj) "\tHandle: " (vla-get-handle obj)))
       )
   )
   (princ)
)
(vl-load-com) (princ)
页: [1]
查看完整版本: 未命名组的循环实体