Treeview-Funcs

Global $aTVItem[1][2] = [[0]]  ; [ID-Item,ID-Parent]

Func _TV_CreateChild($_sText, $_IDParent)
    $aTVItem[0][0] += 1
    ReDim $aTVItem[$aTVItem[0][0] +1][2]
    $aTVItem[$aTVItem[0][0]][0] = GUICtrlCreateTreeViewItem($_sText, $_IDParent)
    $aTVItem[$aTVItem[0][0]][1] = $_IDParent
    Return $aTVItem[$aTVItem[0][0]][0]
EndFunc

Func _TV_CreateSibling($_sText, $_IDSibling)
    Local $IDParent = _GetParent($_IDSibling)
    $aTVItem[0][0] += 1
    ReDim $aTVItem[$aTVItem[0][0] +1][2]
    $aTVItem[$aTVItem[0][0]][0] = GUICtrlCreateTreeViewItem($_sText, $IDParent)
    $aTVItem[$aTVItem[0][0]][1] = $IDParent
    Return $aTVItem[$aTVItem[0][0]][0]
EndFunc

Func _GetParent($_ID)
    Local $index = _ArraySearch($aTVItem, $_ID, 1)
    If $index = -1 Then Return SetError(1,0,0)
    Return $aTVItem[$index][1]
EndFunc