ShowObjectPropertiesDialog Method

Visual Basic
C#
WinRT C#
WinRT JavaScript
C++

public virtual void ShowObjectPropertiesDialog()

'Declaration
 
Public Overridable Sub ShowObjectPropertiesDialog()

'Usage
 
Dim instance As AnnAutomation
 
instance.ShowObjectPropertiesDialog()

public virtual void ShowObjectPropertiesDialog()

 function Leadtools.Windows.Annotations.AnnAutomation.ShowObjectPropertiesDialog()

public:
virtual void ShowObjectPropertiesDialog();

Call the CanShowObjectPropertiesDialog property to determine whether the object's Properties dialog can be displayed at this time. The dialog used is AnnAutomationManager.ObjectPropertiesDialogType. If the value of AnnAutomationManager.ObjectPropertiesDialogType is null (Nothing in Visual Basic), this method will not do anything.

Visual Basic
C#
WinRT C#
WinRT JavaScript
Silverlight C#
Silverlight VB

Copy Code

Private Sub AnnAutomation_ShowObjectPropertiesDialog(ByVal automation As AnnAutomation)
   ' first add a new object to the automation
   Dim rectObj As AnnRectangleObject = New AnnRectangleObject()
   rectObj.Rect = New Rect(100, 100, 100, 100)
   rectObj.Stroke = Colors.Blue
   rectObj.StrokeThickness = 2.0
   rectObj.Fill = Colors.Yellow
   automation.Container.Children.Add(rectObj)

   ' make sure no objects are selected in the automation
   automation.SelectNone()

   ' show the object properties dialog (this should show a message informing you that no objects are currently selected (bring edited)
   ShowProperties(automation)

   ' select (edit) the object we have just added
   automation.StartEditing(rectObj, False)

   ' show the object properties dialog (should show the object properties dialog)
   ShowProperties(automation)
End Sub

Private Sub ShowProperties(ByVal automation As AnnAutomation)
   ' check if we can show the dialog
   If automation.CanShowObjectPropertiesDialog Then
      automation.ShowObjectPropertiesDialog()
   Else
      MessageBox.Show("Cannot show the object properties dialog because no object is currently being edited (selected)")
   End If
End Sub

private void AnnAutomation_ShowObjectPropertiesDialog(AnnAutomation automation)
{
   // first add a new object to the automation
   AnnRectangleObject rectObj = new AnnRectangleObject();
   rectObj.Rect = new Rect(100, 100, 100, 100);
   rectObj.Stroke = Colors.Blue;
   rectObj.Fill = Colors.Yellow;
   rectObj.StrokeThickness = 2.0;
   automation.Container.Children.Add(rectObj);

   // make sure no objects are selected in the automation
   automation.SelectNone();

   // show the object properties dialog (this should show a message informing you that no objects are currently selected (bring edited)
   ShowProperties(automation);

   // select (edit) the object we have just added
   automation.StartEditing(rectObj, false);

   // show the object properties dialog (should show the object properties dialog)
   ShowProperties(automation);
}

private void ShowProperties(AnnAutomation automation)
{
   // check if we can show the dialog
   if(automation.CanShowObjectPropertiesDialog)
      automation.ShowObjectPropertiesDialog();
   else
      MessageBox.Show("Cannot show the object properties dialog because no object is currently being edited (selected)");
}

private void AnnAutomation_ShowObjectPropertiesDialog(AnnAutomation automation)
{
   // first add a new object to the automation
   AnnRectangleObject rectObj = new AnnRectangleObject();
   rectObj.Rect = new Rect(100, 100, 100, 100);
   rectObj.Stroke = Colors.Blue;
   rectObj.Fill = Colors.Yellow;
   rectObj.StrokeThickness = 2.0;
   automation.Container.Children.Add(rectObj);

   // make sure no objects are selected in the automation
   automation.SelectNone();

   // show the object properties dialog (this should show a message informing you that no objects are currently selected (bring edited)
   ShowProperties(automation);

   // select (edit) the object we have just added
   automation.StartEditing(rectObj, false);

   // show the object properties dialog (should show the object properties dialog)
   ShowProperties(automation);
}

private void ShowProperties(AnnAutomation automation)
{
   // check if we can show the dialog
   if(automation.CanShowObjectPropertiesDialog)
      automation.ShowObjectPropertiesDialog();
   else
      MessageBox.Show("Cannot show the object properties dialog because no object is currently being edited (selected)");
}

Private Sub AnnAutomation_ShowObjectPropertiesDialog(ByVal automation As AnnAutomation)
   ' first add a new object to the automation
   Dim rectObj As AnnRectangleObject = New AnnRectangleObject()
   rectObj.Rect = New Rect(100, 100, 100, 100)
   rectObj.Stroke = Colors.Blue
   rectObj.Fill = Colors.Yellow
   rectObj.StrokeThickness = 2.0
   automation.Container.Children.Add(rectObj)

   ' make sure no objects are selected in the automation
   automation.SelectNone()

   ' show the object properties dialog (this should show a message informing you that no objects are currently selected (bring edited)
   ShowProperties(automation)

   ' select (edit) the object we have just added
   automation.StartEditing(rectObj, False)

   ' show the object properties dialog (should show the object properties dialog)
   ShowProperties(automation)
End Sub

Private Sub ShowProperties(ByVal automation As AnnAutomation)
   ' check if we can show the dialog
   If automation.CanShowObjectPropertiesDialog Then
      automation.ShowObjectPropertiesDialog()
   Else
      MessageBox.Show("Cannot show the object properties dialog because no object is currently being edited (selected)")
   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

Reference

AnnAutomation Class
AnnAutomation Members