Leadtools.Annotations Requires Document/Medical product license | Send comments on this topic. | Back to Introduction - All Topics | Help Version 15.10.31
CurrentDesigner Property
See Also  Example
Leadtools.Annotations Namespace > AnnAutomation Class : CurrentDesigner Property




Gets the current working designer.

Syntax

Visual Basic (Declaration) 
Public Overridable ReadOnly Property CurrentDesigner As AnnDesigner
Visual Basic (Usage)Copy Code
Dim instance As AnnAutomation
Dim value As AnnDesigner
 
value = instance.CurrentDesigner
C# 
public virtual AnnDesigner CurrentDesigner {get;}
Managed Extensions for C++ 
public: __property virtual AnnDesigner* get_CurrentDesigner();
C++/CLI 
public:
virtual property AnnDesigner^ CurrentDesigner {
   AnnDesigner^ get();
}

Return Value

The current working AnnDesigner derived object

Example

This example subscribes to the CurrentDesignerChanged event of an AnnAutomation object and the Run event of the AnnRunDesigner to show an information message box when an object is clicked while in Run user mode.

Visual BasicCopy Code
Public Sub AnnAutomation_CurrentDesigner(ByVal automation As AnnAutomation)
   ' subscribe to the DesignerChanged event of the automation
   AddHandler automation.CurrentDesignerChanged, AddressOf automation_CurrentDesignerChanged
End Sub
Private Sub automation_CurrentDesignerChanged(ByVal sender As Object, ByVal e As EventArgs)
   ' check if the current designer is a run designer
   Dim automation As AnnAutomation = CType(IIf(TypeOf sender Is AnnAutomation, sender, Nothing), AnnAutomation)
   If Not automation.CurrentDesigner Is Nothing AndAlso TypeOf automation.CurrentDesigner Is AnnRunDesigner Then
      Dim runDesigner As AnnRunDesigner = CType(IIf(TypeOf automation.CurrentDesigner Is AnnRunDesigner, automation.CurrentDesigner, Nothing), AnnRunDesigner)
      ' subscribe to this run designer Run event
      AddHandler runDesigner.Run, AddressOf runDesigner_Run
   End If
End Sub

Private Sub runDesigner_Run(ByVal sender As Object, ByVal e As AnnRunDesignerEventArgs)
   If e.OperationStatus = AnnDesignerOperationStatus.End Then
      Dim message As String = String.Format("Run object of type {0}, hyperlink = {1}", e.Object.GetType().Name, e.Object.Hyperlink)
      MessageBox.Show(message)
   End If
End Sub
C#Copy Code
public void AnnAutomation_CurrentDesigner(AnnAutomation automation) 

   // subscribe to the DesignerChanged event of the automation 
   automation.CurrentDesignerChanged += new EventHandler(automation_CurrentDesignerChanged); 

private void automation_CurrentDesignerChanged(object sender, EventArgs e) 

   // check if the current designer is a run designer 
   AnnAutomation automation = sender as AnnAutomation; 
   if (automation.CurrentDesigner != null && automation.CurrentDesigner is AnnRunDesigner) 
   { 
      AnnRunDesigner runDesigner = automation.CurrentDesigner as AnnRunDesigner; 
      // subscribe to this run designer Run event 
      runDesigner.Run += new EventHandler<AnnRunDesignerEventArgs>(runDesigner_Run); 
   } 

 
private void runDesigner_Run(object sender, AnnRunDesignerEventArgs e) 

   if (e.OperationStatus == AnnDesignerOperationStatus.End) 
   { 
      string message = string.Format("Run object of type {0}, hyperlink = {1}", e.Object.GetType().Name, e.Object.Hyperlink); 
      MessageBox.Show(message); 
   } 
}

Remarks

(Read only) At any given time, the AnnAutomation can have a working AnnDesigner derived object as follows:
Designer Base ClassNotes
null (Nothing in Visual Basic)(Design and Run user mode) no designer is currently active.
AnnDrawDesigner(Design user mode) The AnnAutomation is currently drawing or about to draw a new object
AnnEditDesigner(Design user mode) One or more objects are currently being edited or are about to be edited
AnnRunDesigner(Run user mode) An object is currently being run or about to be run

This property allows you to hook into the current designer and change or monitor its status while it is running. For example, you can determine if CurrentDesigner is an AnnDrawDesigner derived class and subscribe to the Draw event and so forth.

Requirements

Target Platforms: Microsoft .NET Framework 2.0, Windows 98, Windows NT 4.0, Windows Millennium Edition, Windows 2000, Windows XP Home Edition, Windows XP Professional, Windows Server 2003 family

See Also

Leadtools.Annotations requires a Document or Medical toolkit license and unlock key. For more information, refer to: Raster Pro/Document/Medical Features