Object Model Reference : Classes : T : Transparency : Methods : Transparency.ApplyTextureTransparency |
Function ApplyTextureTransparency(TextureName As String, [LibraryName As String]) As TextureFill
Member of Transparency
The ApplyTextureTransparency method applies a texture-fill transparency to a shape.
Parameter
|
Description
|
TextureName
|
Specifies the name of the texture fill to apply
|
LibraryName
|
Specifies the name of the texture library. This parameter is optional.
|
The following VBA example applies a texture-fill transparency to a rectangle.
Sub Test() |
Dim s As Shape |
Set s = ActiveLayer.CreateRectangle(0, 0, 2, 2) |
s.Fill.UniformColor.RGBAssign 0, 128, 0 |
s.Outline.Type = cdrNoOutline |
s.Transparency.ApplyTextureTransparency "Cosmic Energy", "" |
End Sub |
Copyright 2013 Corel Corporation. All rights reserved.