Мельница данных  (18.09.2020)
(одним файлом)  (cсылка) 
Псевдоподпрограмма TObject.Tree (Дерево)

См. также