Как проинициализировать объект по указателю на него?

[eugrita]

В данном случае работаю в PascalABC
Пусть задан класс Tprep

Код:

type Tprep=class(rabotnik)
   kol: integer; 
   constructor Create(Fam:string;nkaf:integer;st:integer;kl: integer);
end;
...
type  Pprep =^Tprep;
var p:Pprep;
begin
new(p,Tprep.Create('Ivanov I.I.',1,30000,1));//так говорит, что неверное кол-во параметров
...

известно что оператор new(p); создаст объект, но не проинициализирует
приводится часто такая схема New(p, Init);
Но в Pascal ABC вместо Init конструктор Create с параметрами
Разумеется у меня есть в запасе и работает способ инициализации не по указателю а по объекту

Код:

 var  pr:Tprep;
  pr:=Tprep.Create('Ivanov I.I.',1,1);

- это работает.
Будет ли какая нибудь разница этих 2-х способов при многократном пользовании объектом pr ?
Скажем для создания нескольких экз объектов и запихивания в контейнер?
В частности, как освобождать память?

[zubr]

В Object Pascal переменная типа класс является указателем на объект класса.  Естественно можно многократно создавать объект типа Tprep, используя переменную var  pr:Tprep;, только надо куда то сохранять указатели на вновь созданные объекты, чтобы потом можно было их удалить.
К примеру, можно для этих целей использовать TObjectList или TList или даже TStringList.

[eugrita]

ну и среда Pascal ABC 3.1 - не поддерживает виртуальных метов ключ.сл. virtual вызывает у нее отторжение.Зато inherited поддерживает.
Может в ABC.Net это исправлено. Но мне надо делать прогу на Pascal ABC 3.1

[x77]

что вы имеете в виду, объявляя тип PPrep, как указатель на класс TPrep? любой экземпляр класса сам по себе является указателем, разве в АВС это не так?

попробуйте просто:

Код:

var p: Tprep;
begin
  p := new Tprep.Create('Ivanov I.I.', 1, 30000, 1);
  ..

[eugrita]

да. Так и сделал
а вот это

Код:

new(p,Tprep.Create('Ivanov I.I.',1,30000,1));

не работает - ну и черт с ним