Previous Document Next Document

Object Model Reference : Classes : O : Outline : Methods : Outline.SetProperties


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], [MiterLimit As Double])

Description

Member of Outline

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

Any missing parameter does not change the corresponding property.

Parameter
Description
Width
Specifies, in points, the width of the object’s outline. This parameter is optional, and its default value is -1.
Style
Specifies the outline style of the object’s outline. This parameter is optional, and its default value is Nothing.
Color
Specifies the color of the object’s outline. This parameter is optional, and its default value is Nothing.
StartArrow
Specifies the start arrow of the object’s outline. This parameter is optional, and its default value is Nothing.
EndArrow
Specifies the end arrow of the object’s outline. This parameter is optional, and its default value is Nothing.
BehindFill
Determines whether the outline is behind the object’s fill. This parameter is optional, and its default value is cdrUndefined (-2).
ScaleWithShape
Determines whether the object’s outline maintains the size proportions of the object. This parameter is optional, and its default value is cdrUndefined (-2).
LineCaps
Specifies the endpoint style if the outline is open-path. This parameter is optional, and its default value is cdrOutlineUndefinedLineCaps (-1).
LineJoin
Specifies the appearance of the lines that intersect each other in the outline, and returns cdrOutlineLineJoin. This parameter is optional, and its default value is cdrOutlineUndefinedLineJoin (-1).
NibAngle
Specifies the angle of the Brush tool if the outline is calligraphic. This parameter is optional, and its default value is -9999.
NibStretch
Specifies the thickness of the Brush tool if the oultine is calligraphic. This parameter is optional, and its default value is 0.
DashDotLength
Specifies the absolute length of the outline’s dash-dot pattern. This parameter is optional, and its default value is -1.
PenWidth
Specifies the pen width, if the outline is enhanced. This parameter is optional, and its default value is 0.
MiterLimit
Specifies the miter limit. This parameter is optional, and its default value is 0.

VBA example

The following VBA 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

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.