如何将treeview1 中的每个节点 复制到 另一棵空树中 treeView2 最好用递归

Question

谢谢各位!

Answer 1

如果是TREEVEIW2.ASSIGGN(TREEVIEW1) 的话,treeview2只是获得的TREEVIEW1 的指针

Answer 2

treeview2.Assign(treeview1);
就可，简单方便，不用什么递归~

Answer 3

sorry,sorry,没有注意斑竹的回复。
我的机子坏了，现在用的别人的机子，没有delphi-_-!

Answer 4

treeView1 是可以显示内容的树,那么 treeview2.assign(treeview1) 可以让TREEVIEW2显示TREEVIEW1显示同样的内容吗?

Answer 5

這樣可以吧
procedure TForm1.Button1Click(Sender: TObject);
var
  Stream: TMemoryStream;
begin
  Stream := TMemoryStream.Create;
  try
    TreeView1.SaveToStream(Stream);
    Stream.Position := 0;
    TreeView2.LoadFromStream(Stream);
  finally
    Stream.Free
  end;
end;

Answer 6

可以先将treeview1的内容保存在一个文本文件中，然后让treeview2从文本中读取
treeview1.savetofile('文件名.txt');
treeview2.loadfromfile('文件名.txt');
可以很快的复制treeview