Object Model Reference : Classes : S : Shape : Methods : Shape.Combine
|
|
| Object Model Reference : Classes : S : Shape : Methods : Shape.Combine |
Function Combine() As Shape
Member of Shape
The Combine method combines shapes into a curve or text object.
• |
See also the ShapeRange.Combine method.
|
The following VBA example creates two ellipses and combines them into a single curve.
Sub Test() |
Dim doc As Document |
Dim e1 As Shape, e2 As Shape |
Set doc = CreateDocument() |
Set e1 = doc.ActiveLayer.CreateEllipse2(4, 3, 2) |
Set e2 = doc.ActiveLayer.CreateEllipse2(4, 5, 3) |
' Here e2 is selected. Just add e1 to selection |
e1.Selected = True |
Set e1 = doc.Selection.Combine |
e1.Fill.UniformColor.CMYKAssign 100, 0, 0, 0 |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.