Outline.SetProperties

Sub SetProperties([Width As Double = -1], [Style As OutlineStyle], [Color As Color], [StartArrow As ArrowHead], [EndArrow As ArrowHead], [BehindFill As cdrTriState = cdrUndefined], [ScaleWithShape As cdrTriState = cdrUndefined], [LineCaps As cdrOutlineLineCaps = cdrOutlineUndefinedLineCaps], [LineJoin As cdrOutlineLineJoin = cdrOutlineUndefinedLineJoin], [NibAngle As Double = -9999], [NibStretch As Long], [DashDotLength As Double = -1], [PenWidth As Double])

Member of Outline

The SetProperties method allows you to set all of the properties of an outline with a single command.

Any missing parameter does not change the corresponding property.


Parameters	Description
Width	Specifies the width of an object’s outline. An outline's width is measured in points. This parameter is optional, and its default value is -1.
Style	Sets the outline style of an object’s outline This parameter is optional, and its default value is Nothing.
Color	Sets the color of an object’s outline This parameter is optional, and its default value is Nothing.
StartArrow	Sets the start arrow of an object’s outline This parameter is optional, and its default value is Nothing.
EndArrow	Sets the end arrow of an object’s outline This parameter is optional, and its default value is Nothing.
BehindFill	Determines whether an outline is behind the object’s fill This parameter is optional, and its default value is cdrUndefined (-2).
ScaleWithShape	Determines whether an object’s outline maintains the size proportions of the object This parameter is optional, and its default value is cdrUndefined (-2).
LineCaps	Sets the style of the endpoint of an open path outline This parameter is optional, and its default value is cdrOutlineUndefinedLineCaps (-1).
LineJoin	Sets the appearance of lines that intersect each other in an outline. This value returns cdrOutlineLineJoin. This parameter is optional, and its default value is cdrOutlineUndefinedLineJoin (-1).
NibAngle	Sets the angle of the Brush tool in a calligraphic outline This parameter is optional, and its default value is -9999.
NibStretch	Sets the thickness of the Brush tool in a calligraphic outlineThis parameter is optional, and its default value is 0.
DashDotLength	This parameter is optional, and its default value is -1.
PenWidth	This parameter is optional, and its default value is 0.

The following code example creates a rectangle with an outline that is 0.3 inches wide. The blue outline is set behind the rectangle’s fill and does not to scale to size with the rectangle. The outline’s fill has round line caps and beveled line joins. The nib angle is set to 34?with a nib stretch of 100.

Sub test() 
 Dim s As Shape 
 Set s = ActiveLayer.CreateRectangle(3, 3, 7, 7) 
 s.Outline.SetProperties 0.3, , CreateRGBColor(0, 0, 255), , , True, 
_ 
  False, cdrOutlineRoundLineCaps, cdrOutlineBevelLineJoin, 34, 100 
End Sub