用这个显示的是这个效果
Self.TreeView1.Items.Clear;
item:=self.TreeView1.Items.AddChild(nil,scombobox1.Text);
GetDirectories(TreeView1, scombobox1.Text, nil,True);
用这个显示的是这个效果
self.GetDirectories(self.TreeView1,scombobox1.Text,item,True);要怎么改,才能显示这种效果呢?