Object Model Reference : Classes : S : ShapeRange : Methods : ShapeRange.ClearEffect
|
|
| Object Model Reference : Classes : S : ShapeRange : Methods : ShapeRange.ClearEffect |
Sub ClearEffect(Type As cdrEffectType)
Member of ShapeRange
The ClearEffect method removes effects from the shapes in a shape range.
The following VBA example removes the contour effect from all rectangles.
Sub Test() |
Dim s As Shape |
Set s = ActiveLayer.CreateRectangle(2, 2, 4, 4) |
s.Fill.ApplyUniformFill CreateRGBColor(255, 0, 0) |
s.CreateContour cdrContourOutside |
Set s = ActiveLayer.CreateRectangle2(1, 4, 5, 5) |
s.Fill.ApplyUniformFill CreateRGBColor(0, 255, 0) |
s.CreateContour cdrContourInside |
ActivePage.FindShapes(, cdrRectangleShape).CreateSelection |
ActiveSelection.ClearEffect cdrContour |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.