Object Model Reference : Classes : P : PatternCanvas : Methods : PatternCanvas.Clear
|
|
| Object Model Reference : Classes : P : PatternCanvas : Methods : PatternCanvas.Clear |
Sub Clear()
Member of PatternCanvas
The Clear method clears a pattern canvas by filling it with white.
The following VBA example creates a new pattern fill in a 64 × 64 bitmap and then applies the fill to a newly created rectangle.
Sub Test() |
Dim c As New PatternCanvas |
Dim n As Long |
c.Size = cdrPatternCanvas64x64 |
c.Clear |
For n = 2 To 63 Step 2 |
c.Line (0, 0)-(n, n), , B |
Next n |
With ActiveLayer.CreateRectangle(0, 0, 2, 2) |
.Fill.ApplyPatternFill cdrTwoColorPattern |
.Fill.Pattern.Canvas = c |
End With |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.