EffectExtrude.Depth property - Developer Area

API Documentation > Corel DESIGNER > 2022-v24 > EffectExtrude > IVGEffectExtrude

EffectExtrude.Depth property

Gets or sets the extrude depth

Syntax:

Property Get Depth() As Long
Property Let Depth(ByVal Value As Long)

Remarks:

The Depth property returns or specifies the depth of the extrusion. This parameter cannot be used with a parallel extrusion.

Examples:

The following VBA example selects all extruded shapes whose extrusion depth is more than 20 units.

Sub Test()
  Dim s As Shape, eff As Effect
  Dim sr As New ShapeRange
  For Each s In ActivePage.Shapes
    For Each eff In s.Effects
      If eff.Type = cdrExtrude Then
        With eff.Extrude
          If .Type <> cdrExtrudeFrontParallel And .Type <> cdrExtrudeFrontParallel Then
            If .Depth > 20 Then
              sr.Add s
              If Not .ShowBevelOnly Then sr.Add .ExtrudeGroup
                If .UseBevel Then sr.Add .BevelGroup
                End If
              End If
            End With
            Exit For
          End If
        Next eff
      Next s
      sr.CreateSelection
    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