|   |   | Object Model Reference : Classes : F : Fill : Methods : Fill.ApplyFountainFill | 
Function ApplyFountainFill([StartColor As Color], [EndColor As Color], [Type As cdrFountainFillType = cdrLinearFountainFill], [Angle As Double], [Steps As Long], [EdgePad As Long], [MidPoint As Long = 50], [BlendType As cdrFountainFillBlendType = cdrDirectFountainFillBlend], [CenterOffsetX As Double], [CenterOffsetY As Double]) As FountainFill
Member of Fill
The ApplyFountainFill method applies a fountain fill to an object.
| 
Parameter
 | 
Description
 | 
| 
StartColor
 | 
Specifies the starting color of the fountain fill. This parameter is optional, and its default value is Nothing.
 | 
| 
EndColor
 | 
Specifies the ending color of the fountain fill effect. This parameter is optional, and its default value is Nothing.
 | 
| 
Type
 | 
Specifies the type of the fountain fill through a value of cdrFountainFillType. This parameter is optional, and its default value is cdrLinearFountainFill (1).
 | 
| 
Angle
 | 
Specifies the angle in linear, conical, or square fountain fills. Positive values rotate the fill counterclockwise; negative values rotate it clockwise. This parameter is optional, and its default value is 0.
 | 
| 
Steps
 | 
Specifies the number of steps in the fountain fill. This parameter is optional, and its default value is 0.
 | 
| 
EdgePad
 | 
Specifies the length of the edge pad of linear, radial, and square fountain fills. This parameter is optional, and its default value is 0.
 | 
| 
MidPoint
 | 
Specifies the point at which two colors in a fountain fill converge. This value is expressed as a percentage. This parameter is optional, and its default value is 50.
 | 
| 
BlendType
 | 
Specifies the type of fountain-fill blend. This parameter is optional, and its default value is cdrDirectFountainFillBlend (0).
 | 
| 
CenterOffsetX
 | 
Specifies a horizontal offset for the center of the fountain fill. This parameter is optional, and its default value is 0.
 | 
| 
CenterOffsetY
 | 
Specifies a vertical offset for the center of the fountain fill. This parameter is optional, and its default value is 0.
 | 
The following VBA example creates a rectangle and applies a fountain fill that blends from red to yellow:
| Sub Test() | 
|  Dim s As Shape | 
|  Set s = ActiveLayer.CreateRectangle(0, 0, 5, 5) | 
|  s.Fill.ApplyFountainFill CreateRGBColor(255, 0, 0), CreateRGBColor(255, 255, 0) | 
| End Sub | 
|   |   |   | 
Copyright 2013 Corel Corporation. All rights reserved.