Effect.Lens property - Developer Area

C++/CLI
C++
C#
VB
VBA

API Documentation > Corel DESIGNER > 20.1 > Effect > IVGEffect

Effect.Lens property

Gets the lens effect for the object

Syntax:

Property Get Lens() As EffectLens

Remarks:

The Lens property returns the EffectLens object for the lens effect.

Examples:

The following VBA example creates an ellipse and applies a frozen fisheye lens to it.

Sub Test()
  Dim s As Shape, e As Effect
  Dim x As Double, y As Double
  x = ActivePage.SizeWidth / 2
  y = ActivePage.SizeHeight / 2
  Set s = ActiveLayer.CreateEllipse2(x, y, 2)
  Set e = s.CreateLens(cdrLensFishEye, 100)
  e.Lens.Freeze
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