未命名组的循环实体
大家好,我的画中有一些未命名的分组。我能够获取GroupEntity,但我不清楚如何在不进行分解的情况下获取组的实体列表。
请告诉我怎么做。
当做
库马尔。 您可以迭代包含在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]