←Select platform

AfterObjectChanged Event

Summary

Occurs after an AnnObject has been changed.

Syntax

C++

public event EventHandler<AnnAfterObjectChangedEventArgs> AfterObjectChanged

  
Public Event AfterObjectChanged As EventHandler(Of AnnAfterObjectChangedEventArgs)

public: 
event EventHandler<AnnAfterObjectChangedEventArgs^>^ AfterObjectChanged

Event Data

The event handler receives an argument of type AnnAfterObjectChangedEventArgs containing data related to this event. The following AnnAfterObjectChangedEventArgs properties provide information specific to this event.

Property	Description
ChangeType	Gets the type of change.
Designer	Gets the designer responsible for the change.
Objects	Gets the objects that have been changed.

Remarks

This event will be fired after an AnnObject has been modified by this AnnAutomation.

Example

This example will subscribe to the AfterObjectChanged event of all automations and print out a message every time an object changes.

Silverlight C#

Silverlight VB

using Leadtools.Windows.Controls; 
using Leadtools.Windows.Annotations; 
using Leadtools.Demos; 
using Leadtools.Help; 
 
private void AnnAutomation_AfterObjectChanged(AnnAutomationManager manager) 
{ 
   // subscribe to the AfterObjectChanged event of all automations 
   foreach (AnnAutomation automation in manager.Automations) 
      automation.AfterObjectChanged += new EventHandler<AnnAfterObjectChangedEventArgs>(automation_AfterObjectChanged); 
} 
 
private void automation_AfterObjectChanged(object sender, AnnAfterObjectChangedEventArgs e) 
{ 
   // print out a message 
   string message; 
 
   if (e.Objects != null && e.Objects.Count < 0) 
      message = string.Format("Objects Count: " + 
    "{0}, First object: {1}, Changed: {2}", e.Objects.Count, e.Objects[0].GetType().Name, e.ChangeType); 
   else 
      message = String.Format("Changed: {0}", e.ChangeType); 
 
   MessageBox.Show(message); 
}

Imports Leadtools.Windows.Controls 
Imports Leadtools.Windows.Annotations 
 
Private Sub AnnAutomation_AfterObjectChanged(ByVal manager As AnnAutomationManager) 
   ' subscribe to the AfterObjectChanged event of all automations 
   For Each automation As AnnAutomation In manager.Automations 
      AddHandler automation.AfterObjectChanged, AddressOf automation_AfterObjectChanged 
   Next automation 
End Sub 
 
Private Sub automation_AfterObjectChanged(ByVal sender As Object, ByVal e As AnnAfterObjectChangedEventArgs) 
   ' print out a message 
   Dim message As String 
 
   If Not e.Objects Is Nothing AndAlso e.Objects.Count < 0 Then 
      message = String.Format("Objects Count: {0}, First object: {1}, Changed: {2}", 
         e.Objects.Count, e.Objects(0).GetType().Name, e.ChangeType) 
   Else 
      message = String.Format("Changed: {0}", e.ChangeType) 
   End If 
 
   MessageBox.Show(message) 
End Sub

using Leadtools.Windows.Controls; 
using Leadtools.Windows.Annotations; 
using Leadtools.Examples; 
using Leadtools.Silverlight.Demos; 
//using Leadtools.Help; 
 
private void AnnAutomation_AfterObjectChanged(AnnAutomationManager manager) 
{ 
   // subscribe to the AfterObjectChanged event of all automations 
   foreach (AnnAutomation automation in manager.Automations) 
      automation.AfterObjectChanged += new EventHandler<AnnAfterObjectChangedEventArgs>(automation_AfterObjectChanged); 
} 
 
private void automation_AfterObjectChanged(object sender, AnnAfterObjectChangedEventArgs e) 
{ 
   // print out a message 
   string message; 
 
   if (e.Objects != null && e.Objects.Count < 0) 
      message = string.Format("Objects Count:" + 
    "{0}, First object: {1}, Changed: {2}", e.Objects.Count, e.Objects[0].GetType().Name, e.ChangeType); 
   else 
      message = String.Format("Changed: {0}", e.ChangeType); 
 
   MessageBox.Show(message); 
}

Imports Leadtools.Windows.Controls 
Imports Leadtools.Windows.Annotations 
Imports Leadtools.Silverlight.Demos 
'using Leadtools.Help; 
 
Private Sub AnnAutomation_AfterObjectChanged(ByVal manager As AnnAutomationManager) 
   ' subscribe to the AfterObjectChanged event of all automations 
   For Each automation As AnnAutomation In manager.Automations 
      AddHandler automation.AfterObjectChanged, AddressOf automation_AfterObjectChanged 
   Next automation 
End Sub 
 
Private Sub automation_AfterObjectChanged(ByVal sender As Object, ByVal e As AnnAfterObjectChangedEventArgs) 
   ' print out a message 
   Dim message As String 
 
   If Not e.Objects Is Nothing AndAlso e.Objects.Count < 0 Then 
      message = String.Format("Objects Count: {0}, First object: {1}, Changed: {2}", 
      e.Objects.Count, e.Objects(0).GetType().Name, e.ChangeType) 
   Else 
      message = String.Format("Changed: {0}", e.ChangeType) 
   End If 
 
   MessageBox.Show(message) 
End Sub

Requirements

Target Platforms

Reference

AnnAutomation Class

AnnAutomation Members

Help Version 19.0.2017.10.27

Leadtools.Windows.Annotations Assembly

Introduction

Getting Started

Namespaces

Leadtools.Windows.Annotations Namespace

Assemblies