title: How do I use TShellTreeView
body: <p>This is with Delphi XE7. I have a procedure which adds nodes to a TtreeView. The TreeView is created at run-time and added to a Panel. Then this code is run to build the Tree. </p>
  
  <pre><code>var
    node0, node1, node2, node3, node4, node5: TtreeNode;
  begin
    Tree.Items.Clear;
    node0 := Tree.Items.Add(nil, 'Client Folders');
    node1 := Tree.Items.AddChild(node0, 'C:\files');
    node3 := Tree.Items.AddChild(node1, 'Folder 1');
    node2 := Tree.Items.AddChild(node0, '\\Westdc2\dev');
    node4 := Tree.Items.AddChild(node2, 'Folder 2');
    node5 := Tree.Items.AddChildFirst(node4, 'Folder 3');
  </code></pre>
  
  <p>That works correctly; I get client folders with two folders below it: C:\files and \westdc2\dev and folders 1-3 below those. </p>
  
  <p><a href="https://i.stack.imgur.com/l0J1V.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/l0J1V.png" alt="With TtreeView"></a></p>
  
  <p>But if I change the definition of Tree to TShellTreeView (and in the .Create), it doesn't work. I just get Client Folders added and nothing else. </p>
  
  <p><a href="https://i.stack.imgur.com/26sQA.png" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/26sQA.png" alt="enter image description here"></a></p>
  
  <p>This is the same with or without the Tree.Items.Clear which removes the system folders when TShellTreeview is used.</p>