Shape.Transparency property - Developer Area

API Documentation > Corel DESIGNER > 2022-v24.1 > Shape > IVGShape

Shape.Transparency property

Returns the transparency for the current object if applicable

Syntax:

Property Get Transparency() As Transparency

Remarks:

The Transparency property returns a Transparency object that represents the transparency settings for the active shape.

Examples:

The following VBA example applies a 40% uniform transparency to all rectangles and a fountain transparency to all ellipses on a page.

Sub Test()
  Dim s As Shape
  For Each s In ActivePage.Shapes
    Select Case s.Type
      Case cdrRectangleShape
        s.Transparency.ApplyUniformTransparency 40
        ' Working around the ApplyUnifromTransparency method
        If s.Transparency.Uniform <> 40 Then
          s.Transparency.Uniform = 40
        End If
      Case cdrEllipseShape
        s.Transparency.ApplyFountainTransparency Angle:=45
      Case Else
        If s.Transparency.Type <> cdrNoTransparency Then
          s.Transparency.ApplyNoTransparency
        End If
    End Select
  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