关于记录文件的问题(50分)

程序中一处要用到记录文件,但是我想文件这样定义
首先是文件头,这里要写一些概括的内容
接下去都是记录,每个记录都一样
请问我该如何读写这个文件,最好别用流文件,还是记录文件方便

简单的定义文本文件就可以，然后就是writeln(textfile)了
pascal意义上单纯的记录文件是没有头结构的

文本文件或流文件

可以在记录文件的开始先随便写几个记录,用来做文件头
用文本或无类型的方式打开文件读写文件头,
再用记录文件的方式读写后面的记录.

Type THead=Record
HeadDefine here
end;
TRecord=Record
RecordDefine Here
end;

Var
F:File;
H:THead;
Rec:TRecord;
sz:integer;
begin
...........
Blockread(F,H,SizeOf(H));
Blockread(F,Rec,SizeOf(TRecord),sz);
while sz=SizeOf(TRecord) do
begin
do something........
Blockread(F,Rec,SizeOf(TRecord),sz)

end

closefile(f);

不过,使用TFileStream更是一种好方法

多人接受答案了。