怎么将数据以树的形式存储在内存中

如何将数据以树的形式存储在内存中
ADynGroups(数组)中存储了许多分组信息,想将数组转换成树状存储在内存中,ADynGroups中的元素(分组)类型是
Group = Record 
  GroupID,
  ParentID: integer;
  Name: string;
end;

只是以树状的形式存储在内存中,不是以树行显示在窗体中哦,界面上是没有任何树型控件的。