Previous Document Next Document

Object Model Reference : Classes : F : Fill : Methods : Fill.ApplyFountainFill


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

Description

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.

VBA example

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

Previous Document Next Document Back to Top

Copyright 2013 Corel Corporation. All rights reserved.