maxgui : treeview : list nodes

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

hub

Thanks Dreamora. Just a mistake into your previous code. This code works :

Strict

Local win : TGadget =CreateWindow("My Window",40,40,600,400)
Local TreeView : TGadget= CreateTreeView (0,0,100,300, win)    
                
Local MyRoot:TGadget=TreeViewRoot(Treeview)
Local Node1:TGadget = AddTreeViewNode ("node1", MyRoot)
Local Node2:TGadget = AddTreeViewNode ("node2", Node1)
Local Node3:TGadget = AddTreeViewNode ("node3", Node1)
 
For Local n:TGadget = EachIn Node1.kids
   Notify n.GetText()
Next


While True
	WaitEvent 
	Print CurrentEvent.ToString()
	Select EventID()
		Case EVENT_WINDOWCLOSE
			End
	End Select
Wend