TextureFill.MaximumTileWidth

Property MaximumTileWidth As Long

Member of TextureFill

The MaximumTileWidth property returns or sets the maximum size of a tile in a texture-fill pattern, measured in pixels.

The following code example applies a texture fill to a rectangle and displays the maximum size of tiles in the texture:

Sub Test() 
 Dim s As Shape 
 Dim tf As TextureFill 
 Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4) 
 Set tf = s.Fill.ApplyTextureFill("Leather 3C") 
 MsgBox "Max tile width = " & tf.MaximumTileWidth 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.