是在TYPE中定义
TYPE
 TYPE MYREC=RECORD
  NAME : STRING;
  AGE  : INTEGER;
 END ;
.
.
END ;
VAR
REC1 : MYREC ;.
.
REC1.NAME := 'ROSE';
这样的用发应该不对,请教大侠们给个例子!!!