Object Model Reference : Classes : T : TextureFill : Methods : TextureFill.SetProperties
|
|
| Object Model Reference : Classes : T : TextureFill : Methods : TextureFill.SetProperties |
Sub SetProperties(SettingArray() As Variant)
Member of TextureFill
The SetProperties method allows you to set all the properties of a texture fill with a single command.
|
Parameter
|
Description
|
|
SettingArray
|
Specifies the new parameter for a TextureFillProperty object
|
The following VBA example applies the Vapor 2 texture to a rectangle and modifies the following properties in the following ways: Texture # = 20611, Density = 30%, Softness = 75%, Background = Black, Vapor = 40% Cyan, and Brightness = 20%.
Sub Test() |
Dim s As Shape |
Dim tf As TextureFill |
Set s = ActiveLayer.CreateRectangle(0, 0, 2, 2) |
Set tf = s.Fill.ApplyTextureFill("Vapor 2C") |
tf.SetProperties 20611, 30, 75, CreateRGBColor(0, 0, 0), CreateRGBColor(117, 197, 240), 20 |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.