Creates an exact copy of this
AnnObjectBase object.
Syntax
Visual Basic (Declaration) | |
---|
Public Overridable Function Clone() As AnnObjectBase |
Return Value
The
AnnObjectBase object that this class creates.
Example
This example copies the objects from one container to another.
Visual Basic | Copy Code |
---|
Public Sub AnnObject_Clone(ByVal srcContainer As AnnContainer, ByVal destContainer As AnnContainer)
destContainer.Children.Clear()
For Each srcObj As AnnObjectBase In srcContainer.Children
Dim destObj As AnnObjectBase = CType(IIf(TypeOf srcObj.Clone() Is AnnObjectBase, srcObj.Clone(), Nothing), AnnObjectBase)
destContainer.Children.Add(destObj)
Next srcObj
End Sub |
C# | Copy Code |
---|
public void AnnObject_Clone(AnnContainer srcContainer, AnnContainer destContainer) { // first remove all objects from the destination container destContainer.Children.Clear(); // copy the objects from the src to the destination container foreach(AnnObjectBase srcObj in srcContainer.Children) { // we want to keep the original object intact, so create an exact copy by cloning the object AnnObjectBase destObj = srcObj.Clone() as AnnObjectBase; destContainer.Children.Add(destObj); } } |
Requirements
Target Platforms: Microsoft .NET Framework 3.0, Windows XP, Windows Vista, and Windows Server 2003 family
See Also