Software Developer's Kit - ChemDraw

Send comments on this topic
EquilibriumRatio Property
See Also 


Member of ChemDraw Control.Arrow

Sets and returns the ratio of the length of the left component to the right component of the equilibrium arrow

Property type

Read-write property


Visual Basic
Public Property EquilibriumRatio() As Double

Return Type



An equilibrium arrow has half an arrow head on each end and both of these are either kCDArrowHeadPositionHalfLeft or kCDArrowHeadPositionHalfRight.  Therefore, the property ArrowHeadPositionStart = ArrowHeadPositionTail.

The property ShaftSpacing has a value larger than zero.

The arrow in the diagram to the left is an arrow with EquilibriumRatio = 3,  one shaft is three times longer than the other one.


An arrow by default has EquilibriumRatio = 1.



'Declares variable vArrow
 Dim vArrow As ChemDrawControl10Ctl.Arrow
'Checks that there is an arrow loaded in the variable
 If  Selection.Arrows.Count < 1 Then
     Exit Sub
 End If

 Private Sub cmdEquilibriumRatio_click()
    'Gets the EquilibriumRatio for the selected arrow
     Text1.Text = vArrow.EquilibriumRatio 
    'Sets one shaft of the arrow 6 times the length of the other shaft
     vArrow.EquilibriumRatio = 6
 End Sub


See Also