GefLineFormat.EndArrowheadWidth (property)

Gets and sets the width of the end arrowhead in TWIPS.

Syntax:

VARIANT = object.EndArrowheadWidth
object.EndArrowheadWidth = 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_EndArrowheadWidth()

Dim oCimObj As GefObject

    Dim oCimLineFmt As
GefLineFormat

Set oCimObj = CimGetObject

    Set oCimLineFmt =
oCimObj.Line

    If oCimLineFmt.EndArrowheadStyle =
gefArrowheadOpen Or oCimLineFmt.EndArrowheadStyle =
gefArrowheadTriangle Then

        oCimLineFmt.EndArrowheadWidth
= 300

    End If
    cimgetscreen.Refresh False

End Sub