Syntax

Public Function GetTreeNodeData(formID As String, TreeName As String, prop_Id As ENUM_GUI_TREE_NODE_DATA, ByRef prop_Value As String, Optional Index As Integer = 1) As Boolean

Description

This function is used to get a specific tree node property value.

Parameters

Return value

Returns true if the specified property has been returned. Otherwise, returns false.

Sample

Public Sub main()  ''''TODO: Script program start method   dim frmID,Tdata,Ndata  frmID = "3450"  CreateVTLForm CLng(frmID),false,CSTR("Tree View")  CreateVTLControl CSTR(frmID),"treeV",GUI_TREE_VIEW  'set Form GUI properties  SetGUIObject CSTR(frmID),"",GUI_PROPERTY_HEIGHT, 3000  SetGUIObject CSTR(frmID),"",GUI_PROPERTY_WIDTH, 9000   'set Tree View GUI Settings  SetGUIObject CSTR(frmID),CSTR("treeV"),GUI_PROPERTY_HEIGHT, 2000  SetGUIObject CSTR(frmID),CSTR("treeV"),GUI_PROPERTY_WIDTH,8000  SetGUIObject CSTR(frmID),CSTR("treeV"),GUI_PROPERTY_TOP,10  SetGUIObject CSTR(frmID),CSTR("treeV"),GUI_PROPERTY_LEFT,10   SetTreeData CSTR(frmID),"treeV",TREE_ADD_NODE,CSTR(""),false,CSTR("Root"),CSTR("Root")  SetTreeData CSTR(frmID),"treeV",TREE_ADD_NODE,CSTR("Root"),true,CSTR("Child"),CSTR("Child")  SetTreeData CSTR(frmID),"treeV",TREE_ADD_NODE,CSTR(""),false,CSTR("Root2"),CSTR("Root2")  SetTreeData CSTR(frmID),"treeV",TREE_ADD_NODE,CSTR("Root2"),true,CSTR("Child2"),CSTR("Child2")  SetTreeData CSTR(frmID),"treeV",TREE_ADD_NODE,CSTR("Child2"),true,CSTR("Child3"),CSTR("Child3")   GetTreeData CSTR(frmID),"treeV",TREE_COUNT,CSTR(Tdata)  AlertMessage "Tree Count = " & CSTR(Tdata)   SetTreeNode CSTR(frmID),"treeV",NODE_CHECKED,true,CINT(1)   AlertMessage SetTreeNodeData (CSTR(frmID),"treeV",TREE_NODE_KEY,"ChildOfRoot1",CINT(1))   GetTreeNodeData CSTR(frmID),CSTR("treeV"),TREE_NODE_ROOT,CSTR(Ndata)   AlertMessage NdataEnd Sub

See Also

• GetGUIObject
• RemoveVTLForm
• SetTreeNode

Back to VTL Client Script Index