[roamer]

Добавляется указатель на объект (в памяти).
Программист (в общем случае) должен сам позаботиться о том, чтобы создать его в памяти (например, с помощью NEW).
А затем сам же и удалить (Dispose).
Типа этого (применительно к TTreeView).

Код:

Type        
  PRec_AttrEssenceInTree = ^TRec_AttrEssenceInTree; //Атрибуты узла в TTree_DB_fodb
  TRec_AttrEssenceInTree = packed record
                         //ID_THIS       : WideString;
                         ID_THIS       : String[CountChar_in_ID_This]; //ID строки в таблице базы данных
                         ID_KIND       : byte;                         //ID вида (объект или процесс)
                         ITS_BASE      : byte;                         //Признак: базовый или ссылочный
                         ITS_GLOBAL    : byte;                         //Признак глобальности
                         ITS_ABSTRACT  : byte;                         //Признак абстрактности
                       end;

Var            
  PRecEssence  : PRec_AttrEssenceInTree;

begin            
  ...      
  New(PRecEssence);
  ...      
  ...      
  Sx:='Наименование';                
  Selected:=Items.AddChildObject(NodeParent,Sx,PRecEssence);
  ...
  ...      
  Dispose(PRec_AttrEssenceInTree(Node.Data));