Как удалить все под элементы tree view

Здравствуйте! Подскажите пожалуйста, как перебрать или удалить все под элементы выделенного элемента tree view. Код проверки на выделенность такой:

case WM_NOTIFY:
{
    if (((LPNMHDR)lParam)->code == NM_DBLCLK)
    {
        TV_ITEM tvi;
        char Text[256] = "";
        memset(&tvi, 0, sizeof(tvi));
        Selected = (HTREEITEM)SendMessage(treeView, TVM_GETNEXTITEM, TVGN_CARET, (LPARAM)Selected);
        if (Selected == NULL)
        {
            MessageBox(window, "No Items in TreeView", "Error", MB_OK | MB_ICONINFORMATION);
            break;
        }
        TreeView_EnsureVisible(treeView, Selected);
        SendMessage(treeView, TVM_SELECTITEM, TVGN_CARET, (LPARAM)Selected);
        tvi.mask = TVIF_TEXT | TVIF_IMAGE | TVIF_SELECTEDIMAGE | TVIF_PARAM;
        tvi.pszText = Text;
        tvi.cchTextMax = 256;
        tvi.hItem = Selected;

        if (SendMessage(treeView, TVM_GETITEM, TVGN_CARET, (LPARAM)&tvi))
        {

        }
    }
}
break;