Collection: TreeNodes

DIAdem 2018 Help


Edition Date: June 2018
Part Number: 370858P-01
View Product Info

DOWNLOAD (Windows Only)


DIAdem 2017 Help
DIAdem 2018 Help
DIAdem 2019 Help
DIAdem 2020 Help
DIAdem 2020 SP1 Help

Collection of all Nodes in a branch of a tree in a user dialog box.

The following example creates a tree. If you click the Button1 button, the example displays the selected entry and its superordinate, neighboring, and subordinate nodes:

Dim sOutPut
Sub Tree1_EventInitialize(ByRef This)
  Dim oRoot, oMainNode
  Set oRoot = This.Nodes.Add("Tools")
  oRoot.Key = "tools"
  oRoot.Expanded = true
  Set oMainNode = oRoot.Nodes.Add("Electric Tools")
  oMainNode.Key = "electric"
  oMainNode.Nodes.Add("Drill").Key = "drill"
  oMainNode.Nodes.Add("Saw").Key = "saw"
  Set oMainNode = oRoot.Nodes.Add("Hand Tools")
  oMainNode.Key = "handtool"
  oMainNode.Nodes.Add("Hammer").Key = "hammer"
  oMainNode.Nodes.Add("Screwdriver").Key = "screwdriver"
  oMainNode.Nodes.Add("Tongs").Key = "tongs"
End Sub

Sub Button1_EventClick(ByRef This)
  Dim oMyNode
  Set oMyNode = tree1.SelectedItem
  If (Not oMyNode Is Nothing) Then
    sOutPut = "Node selected: " & oMyNode.Text & VBCrLf
    If oMyNode.Parent is Nothing Then
      sOutPut = sOutPut & "Node is root node" & VBCrLf
    Else
      sOutPut = sOutPut & "Parent: " & oMyNode.Parent.Text & VBCrLf
    End If
    If oMyNode.PreviousNode is Nothing Then
      sOutPut = sOutPut & "Node is first node" & VBCrLf
    Else
      sOutPut = sOutPut & "Previous node: " & oMyNode.PreviousNode.Text & VBCrLf
    End If
    If oMyNode.NextNode is Nothing Then
      sOutPut = sOutPut & "Node is last node" & VBCrLf
    Else
      sOutPut = sOutPut & "Next node: " & oMyNode.NextNode.Text & VBCrLf
    End If
    If oMyNode.Nodes.Count = 0 Then
      sOutPut = sOutPut & "Node has no children" & VBCrLf
    Else
      sOutPut = sOutPut & "First child: " & oMyNode.Nodes(1).Text & VBCrLf
    End If
  Else
    sOutPut = "No node selected."
  End If
  Call MsgBox(sOutPut)
End Sub

Properties

Count

Methods

Add | Insert | Item | Remove | RemoveAll

Returned From

Tree.Nodes | TreeNode.Nodes

See Also

Objects Overview

Procedures

Checking a User Dialog Box Entry | Closing a User Dialog Box with a Script | Creating a Dynamic User Dialog Box | Creating a Non-Modal User Dialog Box | Creating a Procedure in the Script of a User Dialog Box | Creating a User Dialog Box without Linking Variables | Creating a User Dialog Box | Creating an Extended Table | Displaying Graphics in Selection Lists | Enabling Controls | Responding to Cancellation of a User Dialog Box | Responding to User Entries in User Dialog Boxes | Saving and Restoring the Last Dialog Box Position | Saving Control Groups for User Dialog Boxes | Specifying the Default Button | Tabulator Order in a User Dialog Box | Transferring a Parameter to a User Dialog Box | Transferring User Dialog Box Entries to DIAdem | Using a Script to Fill a Selection List | Using Channel Selection Lists | Using Hotkeys in a User Dialog Box | Using the Flex Properties

Examples

Checking Dialog Box Entries | Dynamic User Dialog Box | Translating User Dialog Boxes | User Dialog Box for Entering Text and Numbers | User Dialog Box for Sequence Control | User Dialog Box in DIAdem VIEW | User Dialog Box in VIEW for the Calculation of the FFT and Harmonic Frequencies | User Dialog Box with Changing Background Color | User Dialog Box with Curve Preview | User Dialog Box with Extended Table | User Dialog Box with Internet Explorer | User Dialog Box with Scalable Table | User Dialog Box with Selection Lists | User Dialog Box with Selection Lists | User Dialog Box with Subdialog Boxes | User Dialog Box with Tables | User Dialog Box with Tree | Wizard for Tolerance Evaluation

WAS THIS ARTICLE HELPFUL?

Not Helpful