Transparency.ApplyFountainTransparency method - Developer Area

API Documentation > Corel DESIGNER > 2023-v24.5 > Transparency > IVGTransparency

Transparency.ApplyFountainTransparency method

Applies a fountain fill transparency to the object

Syntax:

Function ApplyFountainTransparency(Optional ByVal Start As Long = 0, Optional ByVal End As Long = 100, Optional ByVal Type As cdrFountainFillType = cdrLinearFountainFill, Optional ByVal Angle As Double = 0, Optional ByVal Steps As Long = 0, Optional ByVal EdgePad As Long = 0, Optional ByVal MidPoint As Long = 50, Optional ByVal CenterOffsetX As Double = 0, Optional ByVal CenterOffsetY As Double = 0) As FountainFill

Parameters:

Name	Type	Description
Start	Long	Specifies a percentage value indicating the level of transparency in the beginning of the fountain transparency. Higher values indicate a greater degree of transparency.
End	Long	Specifies a percentage value indicating the level of transparency in the end of the fountain transparency. Higher values indicate a greater degree of transparency.
Type	cdrFountainFillType	Specifies, through a value of cdrFountainFillType, the type of fountain fill in the transparency.
Angle	Double	Specifies the degree of the slant in linear, conical, or square fountain-fill transparencies. Positive values rotate the fill counterclockwise; negative values rotate it clockwise.
Steps	Long	Specifies the number of bands (steps) used to display the fountain fill.
EdgePad	Long	Specifies the length of solid colors at the beginning and end of the fountain transparency before they start blending with the next color in the fountain fill. You can change the edge pad of linear, radial, and square fountain fills.
MidPoint	Long	Specifies the position of the mid-point, the point at which two colors in the fountain fill converge.
CenterOffsetX	Double	Specifies the horizontal offset from the center.
CenterOffsetY	Double	Specifies the vertical offset from the center.

Remarks:

The ApplyFountainTransparency method applies a fountain-fill transparency to a shape.

Examples:

The following VBA example applies a radial fountain-fill transparency to each shape that has a fill.

Sub Test()
  Dim s As Shape
  For Each s In ActivePage.Shapes
    If s.Fill.Type <> cdrNoFill Then
      s.Transparency.ApplyFountainTransparency 0, 90, cdrRadialFountainFill
    End If
  Next s
End Sub

Version Information:

CorelDRAW:	X7.4, X7, X7.6, X8, 2017, 2018, 2019, 2019.2, 2020, 2021, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25
Corel DESIGNER:	X7, 2017.1, 20.1, 2019.2, 2020.1, 2021.5, 2022-v24, 2022-v24.1, 2022-v24.2, 2023-v24.3, 2023-v24.5, 2024-v25