Object Model Reference : Classes : T : Transparency : Methods : Transparency.ApplyPatternTransparency |
Function ApplyPatternTransparency(Type As cdrPatternFillType, [FileName As String], [PatternCanvasIndex As Long = 1], [Front As Long], [Back As Long = 100], [TransformWithShape As Boolean = False]) As PatternFill
Member of Transparency
The ApplyPatternTransparency method applies a pattern-fill transparency to a shape.
Parameter
|
Description
|
Type
|
Specifies, through a value of cdrPatternFillType, the type of pattern-fill transparency
|
FileName
|
Specifies the full path name of the graphic to import as the pattern-fill transparency. This parameter is optional.
|
PatternCanvasIndex
|
Specifies the pattern canvas in the pattern-fill transparency. This parameter is optional, and its default value is 1.
|
Front
|
This parameter is optional, and its default value is 0.
|
Back
|
This parameter is optional, and its default value is 100.
|
TransformWithShape
|
Specifies whether to transform the pattern-fill transparency along with any changes made to the shape. A value of True changes the pattern-fill transparency along with its shape. This parameter is optional, and its default value is False.
|
The following VBA example applies a two-color pattern-fill transparency to a rectangle.
Sub Test() |
Dim s As Shape |
Set s = ActiveLayer.CreateRectangle(0, 0, 2, 2) |
s.Fill.UniformColor.RGBAssign 0, 0, 255 |
s.Transparency.ApplyPatternTransparency cdrTwoColorPattern, , 6 |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.