Software Developer's Kit - ChemDraw

Send comments on this topic
GroupFrame Property
See Also 

Description

Member of ChemDraw Control.AltGroup.

Sets and returns the bounds of the rectangle drawn around the contents of this AltGroup

Property type

Read-write property

Syntax

Visual Basic
Public Property GroupFrame() As Rect

Return Type

Remarks

This property enables all the properties of the rectangle bounding the lower portion of the named Alternative Group, containing the definition of the group.  If this property is absent then the bounds are calculated appropriately based on the size of the contents of the named Alternative Group.

Example

'Returns the top for this AltGroup group frame
 Dim MyAltGroup As ChemDrawControl10Ctl.AltGroup
 Private Sub ChemDrawControl10Ctl_SelectionChanged(ByVal selection As ChemDrawControl10Ctl.IChemDrawSelection)
     If  ChemDrawControl10Ctl.Objects.AltGroups.Count = 1 Then 'Checks if an AltGroup has been drawn
         Set MyAltGroup = ChemDrawControl10Ctl.Objects.AltGroups.Item(1)
         Command1.Enabled = True
     Else
         Command1.Enabled = False
     End If 
 End Sub
 Private Sub Command1_Click()
     vMessage = MsgBox("Top is: " & MyAltGroup.GroupFrame.Top, vbInformation + vbOKOnly, "Info")
 End Sub


See Also