Мельница данных  (30.03.2020)
(одним файлом)  (cсылка) 
Псевдоподпрограмма TObject.Copy (Копировать)

См. также