LEADTOOLS Annotations (Leadtools.Annotations assembly)
LEAD Technologies, Inc

Clone Method (AnnObject)

Example 





Creates an exact copy of this AnnObject object.
Syntax
public virtual object Clone()
'Declaration
 
Public Overridable Function Clone() As Object
'Usage
 
Dim instance As AnnObject
Dim value As Object
 
value = instance.Clone()
public virtual object Clone()
 function Leadtools.Annotations.AnnObject.Clone()
public:
virtual Object^ Clone(); 

Return Value

The AnnObject object that this class creates.
Example
 
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
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);
   }
}
Requirements

Target Platforms: Windows 7, Windows Vista SP1 or later, Windows XP SP3, Windows Server 2008 (Server Core not supported), Windows Server 2008 R2 (Server Core supported with SP1 or later), Windows Server 2003 SP2

See Also

Reference

AnnObject Class
AnnObject Members

 

 


Products | Support | Contact Us | Copyright Notices

© 2006-2012 All Rights Reserved. LEAD Technologies, Inc.