Previous Document Next Document

Object Model Reference : Classes : P : PatternFill : Properties : PatternFill.MirrorFill


PatternFill.MirrorFill

Property MirrorFill As Boolean

Description

Member of PatternFill

The MirrorFill property returns or specifies whether to mirror the pattern tiles in a pattern fill.

VBA example

The following VBA example applies a full-color bitmap pattern to a rectangle and flips the pattern tiles to create a seamless pattern fill.

Sub Test()
 Dim s As Shape
 Dim pf As PatternFill
 Dim FileName As String
 FileName = Application.SetupPath & "Custom\Patterns\drwx0835.pat"
 Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4)
 Set pf = s.Fill.ApplyPatternFill(cdrFullColorPattern, FileName)
 pf.MirrorFill = True
End Sub

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.