Object Model Reference : Classes : C : Curve : Methods : Curve.CopyAssign
|
|
| Object Model Reference : Classes : C : Curve : Methods : Curve.CopyAssign |
Sub CopyAssign(Source As Curve)
Member of Curve
The CopyAssign method copies properties from another curve and applies them to the current 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.