LoadFromString

// Главная форма
frm=new TForm();
frm.Caption="JS+ - метод компонента TTreeView LoadFromString";
frm.Width =250;
frm.Height=300;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=" Дерево загружено из строки";

// TreeView
trv=new TTreeView(frm);
trv.BorderStyle=bsSingle;
trv.Left=trv.Top=10;
trv.Width=frm.ClientWidth-trv.Left*2;
trv.Height=stb.Top-trv.Top*2;

// Заполнение дерева
trv.LoadFromString(
"Узел 1\n"+
" Узел 1-1\n"+
"Узел 2\n"+
" Узел 2-1\n"+
" Узел 2-2\n"+
"Узел 3\n"+
" Узел 3-1\n"+
" Узел 3-2\n"+
" Узел 3-3"
);

trv.SetFocus();
frm.ShowModal();