Для загрузки файла, перейдите по любой из ссылок, что даны ниже!
Если ссылки нет, то обновите страницу
8.48 k
В этом примере размещение объектной переменной (на нее указывает PLINE) в куче сопровождается одновременным обращением к конструктору TLINE.INIT для инициализации объекта и связывания виртуальных методов с вновь созданной переменной: в процедуре New допускается в качестве второго параметра указывать обращение к конструктору. Более того, процедуру New можно вызывать и как функцию в этом случае она возвращает значение типа Pointer, указывающее на динамически распределенный объект: PLine := New(TLine); или PLine := New(TLine, Init): Обратите внимание: первым параметром процедуре New передается указатель на динамически распределяемый объект, в то время как первым параметром функции New ти...
