type PMyData = ^TMyData;
     TMyData = Record
             ID: Integer;
             Name: String;
  end;var PV :PMyData;赋值
Node := TreeView1.Items.Add(nil,'123');
New(PV);
PV.ID := 3;
PV.Name := '123';
Node.Data := PV;使用
 ii :=PMyData(Node.Data)^.ID;
 str := PMyData(Node.Data)^.Name;别忘了最后Dispose(PV);

解决方案 »

  1.   

    每一个Item都有Data属性,是一个指针,你可以用来保存任何结构变量。
      

  2.   

    同意楼上的阿
    我用的就是用两个TREEVIEW
    一个显示NAME
    一个显示ID
    但是显示ID的是HIDE;
      

  3.   

    如果只要存一个ID且这个ID是整型的话,那就没必要象上面那样麻烦,直接这样就可以了。
    treenode.data := Pointer(123);
      

  4.   

    要取值的话直接转换就可以
    Integer(treenode.data)