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

См. также