Previous Document Next Document
TextureFill.RotationAngle

Property RotationAngle As Double

Member of TextureFill

The RotationAngle property returns or sets the angle of the rotation of a tile in a texture-pattern fill.

The following code example creates a texture pattern that is rotated by 45?and skewed by 10?

Sub Test() 
 Dim s As Shape 
 Dim tf As TextureFill 
 Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4) 
 Set tf = s.Fill.ApplyTextureFill("Scribbles") 
 tf.SetProperties 14430, 5, 90 
 tf.RotationAngle = 45 
 tf.SkewAngle = 10 
End Sub 

Previous Document Next Document Back to Top

Copyright 2007 Corel Corporation. All rights reserved.