Динамические объекты ТурбоПаскаль
New (PLine, Init) ; {Размещение динамического объекта}.Dispose (PLine, Done) ; {Удаление динамического объекта}.При необходимости деструктор, как и любой другой метод объекта.(кроме конструктора!) , можно объявить виртуальным.Вызовет сообщение об ошибке.Допускает произвольную глубину вложенности конструкторов.New (Pline, Init).PLine := New (TLine).PLine := New (TLine, Init).New (Pline, PLine^.Init).