Leadtools.Windows.Annotations Namespace > AnnAutomation Class : CurrentEditObject Property |
public AnnObject CurrentEditObject {get;}
'Declaration Public ReadOnly Property CurrentEditObject As AnnObject
'Usage Dim instance As AnnAutomation Dim value As AnnObject value = instance.CurrentEditObject
public AnnObject CurrentEditObject {get;}
get_CurrentEditObject();
public: property AnnObject^ CurrentEditObject { AnnObject^ get(); }
The current object being edited is the AnnObject currently "selected" where its AnnEditDesigner is currently active.
This is the object that will be processed when calling any of the object processing methods of this AnnAutomation. For example, calling Copy will copy the CurrentEditObject into the clipboard.
You can change the CurrentEditObject by calling StartEditing.
Private Sub AnnAutomation_ChangeStrokeToBlue(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.SupportsStroke Then ' change its pen automation.BeginUndo() automation.CurrentEditObject.Stroke = Colors.Blue automation.CurrentEditObject.StrokeThickness = 2.0 automation.EndUndo() End If End If End Sub
private void AnnAutomation_ChangeStrokeToBlue(AnnAutomation automation) { // check if an object is currently "selected" if(automation.CurrentEditObject != null) { // check if this object supports a pen if(automation.CurrentEditObject.SupportsStroke) { // change its pen automation.BeginUndo(); automation.CurrentEditObject.Stroke = Colors.Blue; automation.CurrentEditObject.StrokeThickness = 2.0; automation.EndUndo(); } } }
private void AnnAutomation_ChangeStrokeToBlue(AnnAutomation automation) { // check if an object is currently "selected" if(automation.CurrentEditObject != null) { // check if this object supports a pen if(automation.CurrentEditObject.SupportsStroke) { // change its pen automation.BeginUndo(); automation.CurrentEditObject.Stroke = Colors.Blue; automation.CurrentEditObject.StrokeThickness = 2.0; automation.EndUndo(); } } }
Private Sub AnnAutomation_ChangeStrokeToBlue(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.SupportsStroke Then ' change its pen automation.BeginUndo() automation.CurrentEditObject.Stroke = Colors.Blue automation.CurrentEditObject.StrokeThickness = 2.0 automation.EndUndo() End If End If End Sub
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