：怎么定义一个结构体链表

求救：如何定义一个结构体链表？
好像不能在结构体里面定义该结构体类型的指针，那么想用链表该怎么办呢？


[解决办法]
PLine = ^TLine
TLine = Record
ID: Integer;
Next: PLine
end
[解决办法]
当然可以定义了.

例如双向链表结构:

PListNode=^TListNode;
TListNode=Record
Next:PListNode;
Previous:PListNode;
Data:string;
end;
使用的时候,结点本身,Next,Previous都要用New分配内存。删除时释放。
建议写一个链表类，并不复杂。
[解决办法]
type
Pointer = ^Tdata;
Tdata = Record
ID: Integer;
Next: pointer;
.....
end;
var s:pointer;
new(s);
dispose(s);