GefLineFormat.BeginArrowheadStyle (property)

Gets and sets the style of the begin arrowhead as a GefArrowheadStyleEnum.

Syntax:

GefArrowheadStyleEnum = object.BeginArrowheadStyle
object.BeginArrowheadStyle = GefArrowheadStyleEnum

Description:

Only line (gefLine) objects support this property.

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

Example:

Sub LineFormat_BeginArrowheadStyle()

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