文件类型

声明

Type
  TMingRiFile=file of integer;

文件操作

var
  myfile:textfile;  //定义一个文本文件
begin
  Assignfile(myfile,'c:\Ikh001.txt');
  Rewrite(myfile);  //创建一新文件
  Writeln(myfile,'MingRiSoft Company)'; //向新建的文件中添加内容
  Closefile(myfile);  //关闭文件
end;

《Delphi应用开发完全手册》p35