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

См. также