TreeView的数据如何保存到文件中，同时保存Data指针信息！

Question

TreeView的数据如何保存到文件中，同时保存Data指针信息！

Answer 1

treeview1.items[i].data需要单独再用一个DAT来保存，结点的保存可以用以下方法
// 写
procedure TForm1.Button1Click(Sender: TObject); 
var 
  F: TFileStream; 
begin 
  F:=TFileStream.Create('c:\TreeView.txt',fmCreate or fmShareCompat);
  F.WriteComponent(TreeView1);
  F.Free;
end;////////////////////
//  读
procedure TForm1.Button2Click(Sender: TObject);
var
  F:TFileStream;
begin
  F:=TFileStream.Create('c:\TreeView.txt',fmOpenRead or fmShareDenyWrite);
  F.ReadComponent(TreeView1); 
  F.Free; 
end;