PowerClip.LeaveEditMode method - Developer Area

API Documentation > CorelDRAW > X7.4 > PowerClip > IVGPowerClip

PowerClip.LeaveEditMode method

Leaves the edit mode

Syntax:

Sub LeaveEditMode()

Remarks:

The LeaveEditMode method deactivates the PowerClip-editing mode, thereby preventing PowerClip objects from having their contents edited.

Examples:

The following VBA example adds 20 vertical lines to every PowerClip object on the page.

Sub Test()
  Const NumLines As Long = 20
  Dim s As Shape
  Dim pwc As PowerClip
  Dim x As Double, y As Double, sx As Double, sy As Double
  Dim xx As Double
  Dim n As Long
  For Each s In ActivePage.Shapes
    Set pwc = Nothing
    On Error Resume Next
    Set pwc = s.PowerClip
    On Error GoTo 0
    If Not pwc Is Nothing Then
      s.CreateSelection
      s.GetBoundingBox x, y, sx, sy
      pwc.EnterEditMode
      For n = 1 To NumLines
        xx = x + n * sx / (NumLines + 1)
        ActiveLayer.CreateLineSegment xx, y, xx, y + sy
      Next n
      pwc.LeaveEditMode
    End If
  Next s
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