Software Developer's Kit - ChemDraw

Send comments on this topic
ShaftSpacing Property
See Also 

Description

Member of ChemDraw Control.Arrow

Sets and returns the width of the space between the lines of a double lined arrow

Property type

Read-write property

Syntax

Visual Basic
Public Property ShaftSpacing() As Double

Return Type

Double

Remarks

Increases or decreases the width of the arrow, for straight arrows, and the value is expressed in points.

Increasing shaft spacing of this arrow   from 0 to 6,

will result in an arrow looking like this  

Example

'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 cmdShaftSpacing_Click()
    'To read the current shaft spacing
     Text1.Text = vArrow.ShaftSpacing
    'Sets the width of the arrow
     vArrow.ShaftSpacing = 24
 End Sub

See Also