Transparency.Fountain

Property Fountain As FountainFill

Member of Transparency

The Fountain property returns a FountainFill object that represents the properties of a fountain transparency.

The following code example sets the direction angle of all fountain transparencies to 45?

Sub Test() 
 Dim s As Shape 
 For Each s In ActivePage.Shapes 
  If s.Transparency.Type = cdrFountainTransparency Then 
   s.Transparency.Fountain.SetAngle 45 
  End If 
 Next s 
End Sub 

Copyright 2007 Corel Corporation. All rights reserved.