ShapeRange.SetBoundingBox method - Developer Area

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

ShapeRange.SetBoundingBox method

Move and resize a shape to fit within a specific bounding box, (Area and location)

Syntax:

Sub SetBoundingBox(ByVal x As Double, ByVal y As Double, ByVal Width As Double, ByVal Height As Double, Optional ByVal KeepAspect As Boolean = False, Optional ByVal ReferencePoint As cdrReferencePoint = cdrCenter)

Parameters:

Name	Type	Description
x	Double	Specifies, in document units, the horizontal position of the center of the bounding box
y	Double	Specifies, in document units, the vertical position of the center of the bounding box
Width	Double	Specifies, in document units, the width of the bounding box
Height	Double	Specifies, in document units, the height of the bounding box
KeepAspect	Boolean	Specifies whether to maintain the proportions of the bounding box relative to its contents.
ReferencePoint	cdrReferencePoint	Specifies the reference point.

Remarks:

The SetBoundingBox method moves and resizes a shape range so that it fits the specified bounding box.

Examples:

The following VBA example imports a specified file and places it inside the selected shape (or shapes) while maintaining proportions.

Sub Test()
  Dim x As Double, y As Double, sx As Double, sy As Double
  Dim FileName As String, sr As ShapeRange
  If Documents.Count = 0 Then
    MsgBox "No document is open", vbCritical
    Exit Sub
  End If
  Set sr = ActiveSelectionRange
  If sr.Count = 0 Then
    MsgBox "No shapes selected", vbCritical
    Exit Sub
  End If
  sr.GetBoundingBox x, y, sx, sy
  FileName = CorelScriptTools.GetFileBox("All Files(*.*)|*.*", "Select a file to import")
  If FileName <> "" Then
    ActiveLayer.Import FileName
    Set sr = ActiveSelectionRange
    If sr.Count > 0 Then
      sr.SetBoundingBox x, y, sx, sy, True
    End If
  End If
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