←Select platform

AfterObjectChanged Event

Summary

Occurs after an AnnObject has been changed.

Syntax

C#
VB
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.

PropertyDescription
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.

C#
VB
Silverlight C#
Silverlight VB
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.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); 
} 
using Leadtools.Windows.Controls; 
using Leadtools.Windows.Annotations; 
using Leadtools.Examples; 
using Leadtools.Silverlight.Demos; 
 
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 
 
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

Products | Support | Contact Us | Copyright Notices
© 1991-2017 LEAD Technologies, Inc. All Rights Reserved.
Leadtools.Windows.Annotations Assembly
Click or drag to resize