Object Model Reference : Classes : T : TextureFill : Properties : TextureFill.TransformWithShape |
Property TransformWithShape As Boolean
Member of TextureFill
The TransformWithShape property returns or specifies whether a texture-fill pattern is transformed when its parent shape is altered. If this property is set to True, the texture-fill pattern changes according to transformations of its parent shape; if it is set to False, the texture-fill pattern remains the same, despite changes to the parent shape.
The following VBA example applies a texture fill to a rectangle and specifies that no transformations are made to the fill when the shape is transformed. It then duplicates the shape and stretches it by 200%.
Sub Test() |
Dim s As Shape |
Dim tf As TextureFill |
Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4) |
Set tf = s.Fill.ApplyTextureFill("Water Color") |
tf.TileHeight = 2 |
tf.TileWidth = 2 |
tf.TransformWithShape = False |
Set s = s.Duplicate(4, 0) |
s.StretchEx 2, 3, 4, 0 |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.