ShapeRange.SetOutlineProperties method - Developer Area

API Documentation > Corel DESIGNER > 2022-v24 > ShapeRange > IVGShapeRange

ShapeRange.SetOutlineProperties method

Sets all outline properties

Syntax:

Sub SetOutlineProperties(Optional ByVal Width As Double = -1, Optional ByVal Style As OutlineStyle = Nothing, Optional ByVal Color As Color = Nothing, Optional ByVal StartArrow As ArrowHead = Nothing, Optional ByVal EndArrow As ArrowHead = Nothing, Optional ByVal BehindFill As cdrTriState = cdrUndefined, Optional ByVal ScaleWithShape As cdrTriState = cdrUndefined, Optional ByVal LineCaps As cdrOutlineLineCaps = cdrOutlineUndefinedLineCaps, Optional ByVal LineJoin As cdrOutlineLineJoin = cdrOutlineUndefinedLineJoin, Optional ByVal NibAngle As Double = -9999, Optional ByVal NibStretch As Long = 0, Optional ByVal DashDotLength As Double = -1, Optional ByVal PenWidth As Double = 0, Optional ByVal MiterLimit As Double = 0)

Parameters:

Name	Type	Description
Width	Double	Specifies the width of the outline, measured in points.
Style	OutlineStyle	Specifies the outline style.
Color	Color	Specifies the outline color.
StartArrow	ArrowHead	Specifies a start arrow for the outline.
EndArrow	ArrowHead	Specifies an end arrow for the outline.
BehindFill	cdrTriState	Specifies whether the fill is behind the outline.
ScaleWithShape	cdrTriState	Specifies whether the outline maintains the size proportions of the shape.
LineCaps	cdrOutlineLineCaps	Specifies the endpoint style of an open-path outline.
LineJoin	cdrOutlineLineJoin	Specifies the appearance of lines that intersect each other in an outline, and returns cdrOutlineLineJoin.
NibAngle	Double	Specifies the orientation of the pen nib, relative to the drawing surface, for a calligraphic outline.
NibStretch	Long	Specifies the thickness of the pen nib for a calligraphic outline.
DashDotLength	Double	Specifies the dash-dot length of the outline.
PenWidth	Double	Specifies the pen width of the outline.
MiterLimit	Double

Remarks:

The SetOutlineProperties method sets the outline properties of each shape in a shape range.

Examples:

The following VBA example applies blue, dashed outlines with a width of 0.05" to all the ellipses on the active page.

Sub Test()
  Dim sr As ShapeRange
  Set sr = ActivePage.FindShapes(, cdrEllipseShape)
  sr.SetOutlineProperties 0.05, OutlineStyles(5), CreateRGBColor(0, 0, 255)
End Sub

Version Information:

CorelDRAW:	X7.4, X7, X7.6, X8, 2017, 2018, 2019, 2019.2, 2020, 2021, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25
Corel DESIGNER:	X7, 2017.1, 20.1, 2019.2, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25