Posted by Mohammad Rahhal, Last modified by Diana Alkouni on 07 September 2020 10:13 AM


Public Function GUITreeExpand(formId As String, controlID As String, NodeKey As String)


This function used to generate handle a tree expanded event.


Key Description 
formId Form identifier, must be a number greater than 3000 and less than 10,000.
controlID Control identifier. If it was an empty string, this means that the event has been raised for the form.
NodeKey The key of the parent node in the expanded tree


Public Sub main()

 dim frmID

  frmID = "4000"

  CreateVTLForm CSTR(frmID) , false

  CreateVTLControl CSTR(frmID) , "tree" , GUI_TREE_VIEW

  SetTreeData CSTR(frmID) , "tree" , TREE_ADD_NODE , CSTR("") , false , CSTR("Root") , CSTR("Root")

  SetTreeData CSTR(frmID) , "tree" , TREE_ADD_NODE , CSTR("Root") , true , CSTR("Child") , CSTR("Child")

End Sub

Public Sub GUITreeExpand(formId, controlID,NodeKey)

 If controlID = "tree" then 

   AlertMessage ("tree has been expanded")

 End If

End Sub


See Also

Back to VTL Client Script Index

(0 vote(s))
Not helpful

Comments (0)
Post a new comment
Full Name:
CAPTCHA Verification 
Please enter the text you see in the image into the textbox below (we use this to prevent automated submissions).

Help Desk Software by Hybrid Solutions