PatternCanvas.PutCopy method - Developer Area

API Documentation > CorelDRAW > 2019 > PatternCanvas > IVGPatternCanvas

PatternCanvas.PutCopy method

Puts data of another canvas

Syntax:

Sub PutCopy(ByVal PatternCanvas As PatternCanvas)

Parameters:

Name	Type	Description
PatternCanvas	PatternCanvas	Specifies the pattern canvas to be copied

Remarks:

The PutCopy method places the content of one pattern canvas into the active pattern canvas.

Examples:

The following VBA example creates a new pattern based on the first available fill pattern in the PatternCanvases collection. The new pattern contains a small white rectangle at its center.

Sub Test()
  Dim c As New PatternCanvas
  Dim x As Long, y As Long
  c.PutCopy PatternCanvases(1)
  x = c.Width / 2
  y = c.Height / 2
  c.FillArea x - 10, y - 10, x + 10, y + 10, True
  With ActiveLayer.CreateRectangle(0, 0, 2, 2)
    .Fill.ApplyPatternFill cdrTwoColorPattern
    .Fill.Pattern.Canvas = c
  End With
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