AutoHotkey Community

   ID = 0
   Loop, % TV_GetCount()
   {
      ID := TV_GetNext(ID, "Full")
      If Not TV_Get(ID, "Expand")
         TV_Modify(ID, "Expand")
   }

   ID = 0
   Loop, % TV_GetCount()
   {
      ID := TV_GetNext(ID, "Full")
      If Not TV_Get(ID, "Expand")
         ID_LIST := ID_LIST . "|" . ID
   }
   Loop, Parse, ID_LIST, |
      TV_Modify(A_LoopField, "Expand")

Gui, Add, TreeView,
P1     := TV_Add("First parent")
P1C1   := TV_Add("Parent 1's first child", P1)
P2     := TV_Add("Second parent")
P2C1   := TV_Add("Parent 2's first child", P2)
P2C2   := TV_Add("Parent 2's second child", P2)
P2C2C1 := TV_Add("Child 2's first child", P2C2)

test()

Gui, Show
return

GuiClose:
ExitApp
return

Test()
{
   ID = 0
   Loop, % TV_GetCount()
   {
      ID := TV_GetNext(ID, "Full")
      If Not TV_Get(ID, "Expand")
         TV_Modify(ID, "Expand")
  }
}