Transparency.AppliedTo property - Developer Area

API Documentation > CorelDRAW > X7.6 > Transparency > IVGTransparency

Transparency.AppliedTo property

Gets or sets AppliedTo property of the transparency

Syntax:

Property Get AppliedTo() As cdrTransparencyAppliedTo
Property Let AppliedTo(ByVal Value As cdrTransparencyAppliedTo)

Remarks:

The AppliedTo property returns or specifies whether a transparency is applied to the fill or outline of a shape, or to both.

Examples:

The following VBA example creates a rectangle with a fill and an outline, applying a fountain transparency to its outline.

Sub Test()
  Dim s As Shape
  Set s = ActiveLayer.CreateRectangle2(0, 0, 2, 2, 0.5, 0.5, 0.5, 0.5)
  s.Fill.ApplyFountainFill CreateRGBColor(255, 0, 0), CreateRGBColor(255, 255, 0), , 45
  s.Outline.Width = 0.3
  s.Outline.Color.RGBAssign 0, 128, 0
  s.Transparency.ApplyFountainTransparency 0, 100, cdrLinearFountainFill
  s.Transparency.AppliedTo = cdrApplyToOutline
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