很菜的问题(20分)

这是一个类
type
TWordAnalyze=class
private
{private declarations}
token=record
tokentype:integer;
name:string;
intValue:integer;
floatValue:double;
belong:string;
end;
sourceFile:File of char;
wordFile:File of token
//编译到这行出错！
public
{public declarations}
function connect(fileDir:string):Boolean;
procedure scanner(fileDir:string);
end;

token是一个记录类型。
请问这个问题如何处理？我把我的书都翻过来了也没找到答案，这才来麻烦大家。

wordFile=file of token;

把 token=record
tokentype:integer;
name:string;
intValue:integer;
floatValue:double;
belong:string;
end;
放到类的定义外面

多人接受答案了。