Software Developer's Kit - ChemDraw

Send comments on this topic
ContractObjectsToLabel Method
See Also 
bstrLabel
A string label to hold the structure.

Description

Member of ChemDrawControl.Objects.

Contract the objects into a single label.

Syntax

Visual Basic
Public Sub ContractObjectsToLabel( _
   ByVal bstrLabel As String _
) 

Parameters

bstrLabel
A string label to hold the structure.

Remarks

This property contracts objects to a single label.
When Objects.ContractObjectsToLabel property is applied,
the structure is contracted to a single label:   COOH

Example

Private Sub cmdCommand1_Click() 
    Set myObjects = Me.ChemDrawControl10Ctl.Objects
    On Error Resume Next
    'needs the on error sentence
    myObjects.ContractObjectsToLabel ("Label")
End Sub

Private Sub cmdCommand2_Click()
    Set myAtom = Me.ChemDrawCtl.Atoms.Item(1)
    myAtom.ExpandLabelToStructure
End Sub

 

See Also