Динамические структуры..

[manchester_alan]

Какую динамическую структуру можно представить следующими объявлениями?
1)

    PRec = ^TRec;
    TRec = record
        D: byte;
        Link:PRec;

2)

    PRec = ^TRec;
    TRec = record
        D: byte;
        Pred, Next:PRec;
    end;

и еще

Будет ли выполнен следующий код?

type
 TParent = class
  procedure WriteFields; virtual; abstract;
  class function ParClassInfo:string;
 end;
 TChild = class(TParent)
   FName: string;
   procedure WriteFields; override;
  class function ChildClassInfo:string;
  end;
...
var 
   _par: TParent;
   _child: TChild;
begin
 {1} WriteLn(TParent.ParClassInfo);
 {2} WriteLn(TChild.ChildClassInfo);
  _child:=TChild.Create;
 {3} WriteLn(_child.ChildClassInfo);
end.

[Вадим Мошев]

1. Список.
2. Двунаправленный список.

[manchester_alan]

спасибо) а последнее??

[Stilet]

WriteLn(TParent.ParClassInfo);

Это не сработает.

[northener]

Сообщение от Stilet

Это не сработает.

Почему это не сработает?

[Stilet]

Нда, эт я недоглядел. Чет решил что и этот метод абстрактный. Приношу извинения за смуту.