用pascal 写一个双向链表。

Answer 1

回答： 用record作为节点类型

     type
       Node = record
        Data : string;
        Pre   : ^Node;
        Next : ^Node;
       end;
    TDoubleLinkList = class
    public
        procedure Create;
        procedure Destroy;
        {...Other Operation}
    protected
    {  to do }
    private
    { to do}
    end;