the #PB_Tree_Expanded - Flag is lost after AddGadgetItem():
PureBasic:
SpiderBasic:
SampleCode:
Code: Select all
EnableExplicit
OpenWindow(0, 0, 0, 355, 180, "TreeGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
TreeGadget(0, 10, 10, 160, 160)
AddGadgetItem (0, -1, "Node", 0, 0)
AddGadgetItem(0, -1, "Sub-Item 1", 0, 1)
AddGadgetItem(0, -1, "Sub-Item 2", 0, 1)
AddGadgetItem(0, -1, "Sub-Item 3", 0, 1)
SetGadgetItemState(0, 0, #PB_Tree_Expanded)
AddGadgetItem(0, -1, "Sub-Item 4", 0, 1)
CompilerIf #PB_Compiler_OS <> #PB_OS_Web
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
CompilerEndIf