Build powerful tree diagrams with TeeTree

// Sources\Packages\Lite\TeeTree_Lite.groupproj
// Right-click DclVCL and click "Install"
// Right-click DclFMX and click "Install" (for FireMonkey)

uses TeeTree; // or FMXTee.Tree for FireMonkey

var
  Tree1: TTree;
begin
  Tree1 := TTree.Create(Self);
  Tree1.Parent := Self;
end;

var
  MyRoot: TTreeNodeShape;
begin
  // Add a root node
  MyRoot := Tree1.Add('Root Node');
  
  // Add children to the root
  MyRoot.AddChild('Child Node 1');
  MyRoot.AddChild('Child Node 2');
  
  // Expand to show the tree
  MyRoot.Expanded := True;
end;