Software Developer's Kit - ChemDraw

Send comments on this topic
BracketLipSize Property
See Also 

Description

Member of ChemDraw Control.Bracket.

Returns the size of the lip of this bracket.

Property type

Read-only property

Syntax

Visual Basic
Public Property BracketLipSize() As Long

Return Type

Long

Example

'Declares variables
 Dim vbracket1 As ChemDrawControl10Ctl.bracket
 Dim vbracket2 As ChemDrawControl10Ctl.bracket 
'Checks that there is a bracket loaded in the variable
 Private Sub ctlChemDraw_SelectionChanged(ByVal selection _ 
         As ChemDrawControl10Ctl.IChemDrawSelection) 
     If  Selection.brackets.Count < 1 OR Selection.Brackets.Count > 2 Then
         Exit Sub
     Else
         If 
Selection.Brackets.Count = 1 Then
             Set vbracket1 =  ctlChemDraw.Selection.Objects.Brackets.Item(1)
         Else
             Set
vbracket1 =  ctlChemDraw.Selection.Objects.Brackets.Item(1)
             Set vbracket2 =  ctlChemDraw.Selection.Objects.Brackets.Item(2)
         End If
     End If
 End Sub 
 
 
Private Sub Command1_Click()
     lblLipSize.Caption = vBracket1.BracketLipSize
 End Sub

See Also