在Delphi中，可以使用TTreeNode的AddChild方法來動態加載TreeView信息。以下是一個簡單的示例代碼：
procedure TForm1.Button1Click(Sender: TObject);
var
Node: TTreeNode;
begin
// 清空TreeView
TreeView1.Items.Clear;
// 創建根節點
Node := TreeView1.Items.Add(nil, 'Root');
// 創建子節點
TreeView1.Items.AddChild(Node, 'Child 1');
TreeView1.Items.AddChild(Node, 'Child 2');
// 展開根節點
Node.Expand(True);
end;
在上述代碼中，首先清空TreeView的所有節點，然后創建一個根節點。使用AddChild方法為根節點創建兩個子節點，最后展開根節點。
如果要動態加載更多的節點，可以在需要的時候使用AddChild方法為指定的父節點創建子節點。
注意：在以上示例中，使用了一個Button的Click事件來觸發動態加載TreeView信息的操作。你可以根據自己的需求選擇適當的事件來觸發動態加載操作。
