Object Model Reference : Classes : F : FountainColor : Methods : FountainColor.Delete
|
|
| Object Model Reference : Classes : F : FountainColor : Methods : FountainColor.Delete |
Sub Delete()
Member of FountainColor
The Delete method removes a color point from a fountain fill.
• |
You cannot delete starting and ending color points.
|
The following VBA example removes any intermediate color points in a fountain fill, leaving only the starting and ending points.
Sub Test() |
Dim cl As FountainColor |
If ActiveShape.Fill.Type <> cdrFountainFill Then |
MsgBox "The selected shape must have a fountain fill." |
Exit Sub |
End If |
For Each cl In ActiveShape.Fill.Fountain.Colors |
cl.Delete |
Next cl |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.