Returns the top most group name that an object is assigned. This function primarily applies to objects that are members of nested groups.
Rhino.ObjectTopGroup (strObject)
|
strObject |
Required. String. The identifier of the object. |
|
String |
The top most group name of the object if successful |
|
Null |
If not successful, or on error. |
Dim strObject, strGroup
strObject = Rhino.GetObject("Select object")
If strObject <> vbNull Then
strGroup = Rhino.ObjectTopGroup(strObject)
If strGroup <> vbNull Then
Rhino.Print "Top object group: " & strGroup
End If
End If