←Select platform

FindObject Method

Summary

Finds the AnnAutomationObject associated with a certain ID.

Syntax

C++

public AnnAutomationObject FindObject( 
   int id 
)

  
Public Function FindObject( _ 
   ByVal id As Integer _ 
) As Leadtools.Windows.Annotations.AnnAutomationObject

public: 
Leadtools.Windows.Annotations.AnnAutomationObject^ FindObject(  
   int id 
)

Parameters

id
The ID of the AnnAutomationObject to find

Return Value

The AnnAutomationObject from Objects for this ID if found; null (Nothing in VB) otherwise.

Remarks

This method enumerates all of the AnnAutomationObject items in the Objects collection and compares AnnAutomationObject.Id with id.

Example

This example changes the line color of new line automation objects to blue.

Silverlight C#

Silverlight VB

using Leadtools.Windows.Controls; 
using Leadtools.Windows.Annotations; 
using Leadtools.Demos; 
using Leadtools.Help; 
 
private void AnnAutomationManager_FindObject(AnnAutomationManager manager) 
{ 
   // fine the line automation object 
   AnnAutomationObject autObj = manager.FindObject(AnnAutomationManager.LineObjectId); 
   if (autObj != null) 
   { 
      autObj.Object.Stroke = Colors.Blue; 
      autObj.Object.StrokeThickness = 2.0; 
   } 
}

Imports Leadtools.Windows.Controls 
Imports Leadtools.Windows.Annotations 
 
Private Sub AnnAutomationManager_FindObject(ByVal manager As AnnAutomationManager) 
   ' fine the line automation object 
   Dim autObj As AnnAutomationObject = manager.FindObject(AnnAutomationManager.LineObjectId) 
   If Not autObj Is Nothing Then 
      autObj.Object.Stroke = Colors.Blue 
      autObj.Object.StrokeThickness = 2.0 
   End If 
End Sub

using Leadtools.Windows.Controls; 
using Leadtools.Windows.Annotations; 
using Leadtools.Examples; 
using Leadtools.Silverlight.Demos; 
//using Leadtools.Help; 
 
private void AnnAutomationManager_FindObject(AnnAutomationManager manager) 
{ 
   // fine the line automation object 
   AnnAutomationObject autObj = manager.FindObject(AnnAutomationManager.LineObjectId); 
   if (autObj != null) 
   { 
      autObj.Object.Stroke = Colors.Blue; 
      autObj.Object.StrokeThickness = 2.0; 
   } 
}

Imports Leadtools.Windows.Controls 
Imports Leadtools.Windows.Annotations 
Imports Leadtools.Silverlight.Demos 
'using Leadtools.Help; 
 
Private Sub AnnAutomationManager_FindObject(ByVal manager As AnnAutomationManager) 
   ' fine the line automation object 
   Dim autObj As AnnAutomationObject = manager.FindObject(AnnAutomationManager.LineObjectId) 
   If Not autObj Is Nothing Then 
      autObj.Object.Stroke = Colors.Blue 
      autObj.Object.StrokeThickness = 2.0 
   End If 
End Sub

Requirements

Target Platforms

Reference

AnnAutomationManager Class

AnnAutomationManager Members

Help Version 19.0.2017.10.27

Leadtools.Windows.Annotations Assembly

Introduction

Getting Started

Namespaces

Leadtools.Windows.Annotations Namespace

Assemblies