←Select platform

Clone Method

Summary

Creates an exact copy of this AnnObject object.

Syntax

C#
VB
C++
public virtual AnnObject Clone() 
  
Public Overridable Function Clone() As Leadtools.Windows.Annotations.AnnObject 

Return Value

The AnnObject object that this class creates.

Example

This example copies the objects from one container to another.

C#
VB
Silverlight C#
Silverlight VB
using Leadtools.Windows.Controls; 
using Leadtools.Windows.Annotations; 
using Leadtools.Demos; 
using Leadtools.Help; 
 
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 (AnnObject srcObj in srcContainer.Children) 
   { 
      // we want to keep the original object intact, so create an exact copy by cloning the object 
      AnnObject destObj = srcObj.Clone() as AnnObject; 
      destContainer.Children.Add(destObj); 
   } 
} 
Imports Leadtools.Windows.Controls 
Imports Leadtools.Windows.Annotations 
 
Public Sub AnnObject_Clone(ByVal srcContainer As AnnContainer, ByVal destContainer As AnnContainer) 
   ' first remove all objects from the destination container 
   destContainer.Children.Clear() 
 
   ' copy the objects from the src to the destination container 
   For Each srcObj As AnnObject In srcContainer.Children 
      ' we want to keep the original object intact, so create an exact copy by cloning the object 
      Dim destObj As AnnObject = DirectCast(srcObj.Clone(), AnnObject) 
      destContainer.Children.Add(destObj) 
   Next srcObj 
End Sub 
using Leadtools.Windows.Controls; 
using Leadtools.Windows.Annotations; 
using Leadtools.Examples; 
//using Leadtools.Help; 
 
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 (AnnObject srcObj in srcContainer.Children) 
   { 
      // we want to keep the original object intact, so create an exact copy by cloning the object 
      AnnObject destObj = srcObj.Clone() as AnnObject; 
      destContainer.Children.Add(destObj); 
   } 
} 
Imports Leadtools.Windows.Controls 
Imports Leadtools.Windows.Annotations 
 
Public Sub AnnObject_Clone(ByVal srcContainer As AnnContainer, ByVal destContainer As AnnContainer) 
   ' first remove all objects from the destination container 
   destContainer.Children.Clear() 
 
   ' copy the objects from the src to the destination container 
   For Each srcObj As AnnObject In srcContainer.Children 
      ' we want to keep the original object intact, so create an exact copy by cloning the object 
      Dim destObj As AnnObject = TryCast(srcObj.Clone(), AnnObject) 
      destContainer.Children.Add(destObj) 
   Next srcObj 
End Sub 

Requirements

Target Platforms

See Also

Reference

AnnObject Class

AnnObject Members

Help Version 19.0.2017.10.27
Products | Support | Contact Us | Copyright Notices
© 1991-2017 LEAD Technologies, Inc. All Rights Reserved.

Leadtools.Windows.Annotations Assembly