动态分配内存{用GETMEM（）}(100分)

我在WIN2000工作站上用DELPHI-5编写一个操作链表的程序，链表的结构如下：
PMYSTRUCTOR=^MYSTRUCTOR

MYSTRUCTOR=RECORD
ORDINAL:INTEGER;
NEXT_PTRMYSTRUCTOR;
CLASS_PTR://指向一个自定义的类；
END;
VAR HEAD_PTR,TAIL_PTRMYSTRUCTOR;
PROCEDURE//
GETMEM(HEAD_PTR,SIZEOF(PMYSTRUCTOR));
HEAD_PTR^.ORDINAL:=1;
TAIL_PTR:=HEAD_PTR;

在用以下的方式调用GETMEM(TAIL_PTR^.NEXT_PTR,SIZEOF(PMYSTRUCTOR))进行链表指针的内存单元的分配时程序就自动从WIN2000上退出
如有答案提供，不胜感谢！

GetMem(Tail_Ptr^.Next_Ptr,SizeOf(MyStructor);
~~~~~~~~~~是MyStructor不是PMyStructor

PMyStructor是一个指针，其大小永远是4

JohnsonGuo:
高手！

GETMEM(TAIL_PTR^.NEXT_PTR,SIZEOF(MYSTRUCTOR))
^^^^^^^^^^

感谢JOHNSONGUO所提供的答案。

弱