Leadtools.Annotations Namespace > Classes > AnnAutomation > Properties > CurrentEditObject Property

public virtual Leadtools.Annotations.AnnObject CurrentEditObject {get;} 

  
Public Overridable ReadOnly Property CurrentEditObject As Leadtools.Annotations.AnnObject 

public: 
virtual property Leadtools.Annotations.AnnObject^ CurrentEditObject { 
   Leadtools.Annotations.AnnObject^ get(); 
} 

using Leadtools; 
using Leadtools.Annotations; 
using Leadtools.WinForms; 
using Leadtools.Drawing; 
 
public void AnnAutomation_ChangePenToBlue(AnnAutomation automation) 
{ 
   // check if an object is currently "selected" 
   if (automation.CurrentEditObject != null) 
   { 
      // check if this object supports a pen 
      if (automation.CurrentEditObject.SupportsPen) 
      { 
         // change its pen 
         automation.BeginUndo(); 
         automation.CurrentEditObject.Pen = new AnnPen(Color.Blue, new AnnLength(2, AnnUnit.Pixel)); 
         automation.EndUndo(); 
         automation.Viewer.Invalidate(automation.CurrentEditObject.InvalidRectangle); 
      } 
   } 
} 

Imports Leadtools 
Imports Leadtools.Annotations 
Imports Leadtools.WinForms 
Imports Leadtools.Drawing 
 
Public Sub AnnAutomation_ChangePenToBlue(ByVal automation As AnnAutomation) 
   ' check if an object is currently "selected" 
   If Not automation.CurrentEditObject Is Nothing Then 
      ' check if this object supports a pen 
      If automation.CurrentEditObject.SupportsPen Then 
         ' change its pen 
         automation.BeginUndo() 
         automation.CurrentEditObject.Pen = New AnnPen(Color.Blue, New AnnLength(2, AnnUnit.Pixel)) 
         automation.EndUndo() 
         automation.Viewer.Invalidate(automation.CurrentEditObject.InvalidRectangle) 
      End If 
   End If 
End Sub 

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

Leadtools.Annotations Assembly