Leadtools.Annotations Namespace > Classes > AnnObject > Methods > Clone Method

public virtual object Clone() 

  
Public Overridable Function Clone() As Object 

public: 
virtual Object^ Clone();  

using Leadtools; 
using Leadtools.Annotations; 
using Leadtools.Codecs; 
using Leadtools.WinForms; 
using Leadtools.Drawing; 
 
public void AnnObject_Clone(AnnContainer srcContainer, AnnContainer destContainer) 
{ 
   // first remove all objects from the destination container 
   destContainer.Objects.Clear(); 
 
   // copy the objects from the src to the destination container 
   foreach (AnnObject srcObj in srcContainer.Objects) 
   { 
      // we want to keep the original object intact, so create an exact copy by cloning the object 
      AnnObject destObj = srcObj.Clone() as AnnObject; 
      destContainer.Objects.Add(destObj); 
   } 
} 

Imports Leadtools 
Imports Leadtools.Annotations 
Imports Leadtools.Codecs 
Imports Leadtools.WinForms 
Imports Leadtools.Drawing 
 
Public Sub AnnObject_Clone(ByVal srcContainer As AnnContainer, ByVal destContainer As AnnContainer) 
   ' first remove all objects from the destination container 
   destContainer.Objects.Clear() 
 
   ' copy the objects from the src to the destination container 
   For Each srcObj As AnnObject In srcContainer.Objects 
      ' we want to keep the original object intact, so create an exact copy by cloning the object 
      Dim destObj As AnnObject = CType(IIf(TypeOf srcObj.Clone() Is AnnObject, srcObj.Clone(), Nothing), AnnObject) 
      destContainer.Objects.Add(destObj) 
   Next srcObj 
End Sub 

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

Leadtools.Annotations Assembly