Object Model Reference : Classes : C : Curve : Methods : Curve.GetCopy
|
|
| Object Model Reference : Classes : C : Curve : Methods : Curve.GetCopy |
Function GetCopy() As Curve
Member of Curve
The GetCopy method returns a copy of the properties of a curve, copying them as a free curve.
The following VBA example creates a spiral, makes a copy of the curve, and adjusts the nodes of the copy. It then assigns the properties of the copy to the original shape.
Sub Test() |
Dim c As Curve, n As Node, s As Shape |
Set s = ActiveLayer.CreateSpiral(4, 5, 7, 2, 8, cdrSymmetric, 2) |
Set c = s.Curve.GetCopy |
For Each n In c.Nodes |
n.Move Rnd(), Rnd() - 0.5 |
Next n |
s.Curve.CopyAssign c |
End Sub |
|
|
|
|
Copyright 2013 Corel Corporation. All rights reserved.