ShapeRange.Unproject method - Developer Area

API Documentation > CorelDRAW > X7 > ShapeRange > IVGShapeRange

ShapeRange.Unproject method

Removes projection transformation from a range of shapes

Syntax:

Function Unproject(ByVal Plane As cdrProjectPlane, Optional ByVal ReferencePoint As cdrReferencePoint = cdrCenter, Optional ByVal ApplyToDuplicate As Boolean = False) As ShapeRange

Parameters:

Name	Type	Description
Plane	cdrProjectPlane	Specifies the isometric view
ReferencePoint	cdrReferencePoint	Specifies the reference point for the conversion.
ApplyToDuplicate	Boolean	Specifies whether to apply the conversion to a duplicate, leaving the original shape range unchanged.

Remarks:

The Unproject method converts a a three-dimensional shape range into a two-dimensional shape range.

Examples:

The following VBA example projects the shape range to the top isometric plane, using the upper-right corner of the bounding box of the shape range as the reference point.

Sub Test()
  Dim shp1 As Shape
  Dim shp2 As Shape
  Dim shpRng As ShapeRange
  Set shp1 = ActiveLayer.CreateRectangle2(0,0,3,6)
  Set shp2 = ActiveLayer.CreateRectangle2(2,2,5,3)
  Set shpRng = ActiveLayer.FindShapes(Type:=cdrRectangleShape)
  shpRng.Project cdrProjectTop, cdrProjectRight
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