Delphi链表问题(队列)

    近来有好多同学问到在delphi中使用链表的问题,在这里我就简单来说说吧.
   对C语言版的链表大家都很熟识了,我们就先来看看C关于链表的定义,这里以队列为例:
   typedef struct Qnode{  //定义数据元素类型
        int data;
    struct Qnode  *next;
}Qnode,*QueuePtr;
typedef struct{         //定义队列
    QueuePtr front;
    QueuePtr rear;
}LinkQueue;
这里我们只要把握一点就行: next,front,rear三个变量都是Qnode类指针.QueuePtr front等价于Qnode *front。
下面看看delphi中的定义：
type
  link=^node;        //定义链表数据类型
    node=record
      data:string;
      next:link;
      end;
type
 LinkQueue=record      //定义队列(具有头指针和尾指针)
    front:link;
    rear:link;
    end;
这里的定义和C的定义在本质上的一样的，只是表现形式有点区别而已，link=^node表明link是node类指针，在理解上我们可能这样定义:
type
   //定义链表数据类型
    node=record
      data:string;
      next:^node;//这里把link换成了^node
      end;
这个只是理解上的定义，编译时会产生如下错误的:
[错误] Unit1.pas(28): Type 'node'