Мельница данных  (22.06.2021)
(одним файлом)  (cсылка) 
Процедура TClass.GenerateConstructor (Сгенерировать текст конструктора)

См. также