Products | Support | Email a link to this topic. | Send comments on this topic. | Back to Introduction - All Topics | Help Version 19.0.5.2
|
Leadtools.Annotations Namespace > AnnObject Class : Clone Method |
public virtual object Clone()
'Declaration Public Overridable Function Clone() As Object
public: virtual Object^ Clone();
This example copies the objects from one container to another.
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
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); } }