Указатель класса на самого себя

← →
Simpson © (2008-08-23 09:57) [0]

Как указать что у поля класса, тип текущего класса?
Что то никак не могу придумать.

TSome=class
pred,next:TSome;
end;

TFirst=class(TSome)
x:integer;
end;

Как указать тип поля чтобы подобная операция срабатывала
...
pointer:TFirst;
...
var
first:TFirst;
begin
first := TFirst.Create;
pointer.next := first;
end;

← →
DVM © (2008-08-23 10:05) [1]

> Как указать что у поля класса, тип текущего класса?

TMyClass = class;

TMyClass = class
FClass: TMyClass;
end;

← →
sniknik © (2008-08-23 10:08) [2]

> Как указать что у поля класса, тип текущего класса?
> Что то никак не могу придумать.
а вот именно так как показано разве не работает?

← →
Simpson © (2008-08-23 22:07) [3]

sniknik © (23.08.08 10:08) [2]
Нет не работает, возвращает класс предка.

DVM © (23.08.08 10:05) [1]
А если их больше 3-х?

> Нет не работает, возвращает класс предка.
кто возвращает? куда? ... в показном нет никаких возвратов.

зато
> Как указать тип поля чтобы подобная операция срабатывала
подобная операция срабатывает, и даже не подобная, а вот эта самая один в один. и ???

в чем тогда вопрос? говори понятно.

> Simpson © (23.08.08 22:07) [3]
> sniknik © (23.08.08 10:08) [2]
> Нет не работает, возвращает класс предка.

Где возвращает?

Указатель класса на самого себя Найти похожие ветки