Das mit der Klasse "TTreeNodeEx" war schon ganz richtig.
Jetzt musst Du lediglich noch in dem Ereignis "OnCreateNodeClass" des Treeviews diese Klasse zurückliefern:
Delphi-Quellcode:
procedure TForm1.TreeView1CreateNodeClass(Sender: TCustomTreeView;
var NodeClass: TTreeNodeClass);
begin
NodeClass := TTreeNodeEx;
end;
Wann immer Du jetzt einen Node anspricht einfach per "Typecast" ansprechen:
Delphi-Quellcode:
...
(Node as TTreeNodeEx).GroupID := ...;
...