delphi中的record怎么动态分配内存？

Question

求解。
就相当于c++中可以
new 一个结构体出来，delphi中怎么动态分配一个record对象，并得到指向其的指针呢？
因为vt树的结构体中设计了一个指向record类型变量的指针，所以在添加节点的时候，必须要在堆上动态分配一个record对象的内存出来

Answer 1

//定义结构体
TNodeInfoEx = Record
    NodeID    : Integer;
    ParentID  : Integer;
    end;
PNodeInfoEx = ^TNodeInfoEx;
//向树上加结构体
procedure AddItem(TV:TTreeView);
var
  PTreeItemEx:PNodeInfoEx;
begin
  New(PTreeItemEx);
  PTreeItemEx^.NodeID:=1;
  PTreeItemEx^.ParentID:=1;
  TV.Items.AddObject(, , Pointer(PTreeItemEx));//把结构体指针加到Items的地址列
end;

Answer 2

在析构树时要把在堆上动态创建的结构体Dispose掉