Adding the desktop as root to a TreeView:
var Node: TTreeNode; begin Node := TreeView.Items.Add(nil, ShellBrowser.GetDesktopName); Node.ImageIndex := ShellBrowser.GetDesktopIconIndex; Node.SelectedIndex := ShellBrowser.GetDesktopIconIndex; end;