GefLineFormat.BeginArrowheadLength (property)

Gets and sets the length of the begin arrowhead in TWIPS.

Syntax:

VARIANT = object.BeginArrowheadLength
object.BeginArrowheadLength = VARIANT

Description:

Only line (gefLine) objects support this property.

If the object does not support this property the return value is undefined.

Example:

Sub LineFormat_BeginArrowheadLength()

Dim oCimObj As GefObject

    Dim oCimLineFmt As
GefLineFormat

Set oCimObj = CimGetObject

    Set oCimLineFmt =
oCimObj.Line

    If oCimLineFmt.BeginArrowheadStyle =
gefArrowheadOpen Or _

          oCimLineFmt.BeginArrowheadStyle
= gefArrowheadTriangle Then

        oCimLineFmt.BeginArrowheadLength
= 800

    End If
    CimGetScreen.Refresh False

End Sub