TDTreeView collapse tree when item found