API Documentation > CorelDRAW > 2025-v26 > EffectDropShadow > IVGEffectDropShadow
EffectDropShadow.PerspectiveStretch property
Gets or sets the feather perspective stretch
Syntax:
Property Get PerspectiveStretch() As Double
Property Let PerspectiveStretch(ByVal Value As Double)
Remarks:
The PerspectiveStretch returns or specifies the stretch parameters of a perspective drop shadow.
Examples:
The following VBA example converts all flat drop shadows to perspective drop shadows.
Sub Test()
Dim s As Shape
For Each s In ActivePage.Shapes
  If s.Type = cdrDropShadowGroupShape Then

 With s.Effect.DropShadow


If .Type = cdrDropShadowFlat Then


  .Type = cdrDropShadowBottom


  .PerspectiveAngle = 45


  .PerspectiveStretch = -0.5


End If

 End With
  End If
Next s 
End Sub