文本文件?INI文件?还是什么文件?

解决方案 »

  1.   

    三种文件及打开文件的方法,要详细了解可看开发指南
    文本文件:
    var
      YouFile:TextFile;
    begin
      AssignFile(YouFile,'FileName');
      ReSet(YouFile);
      try
        //操作
      finally
        ColseFile(YouFile);
      end;
    end;
    类型文件:
    var
      Rec:TYouRec;
      YouDataFile:File of TYouRec;
    begin
      AssignFile(YouDataFile,'filename');
      Reset(YouDataFile);
      try
        if not Eof(YouDataFile) then
          read(YouDataFile,Rec);
      finally
        CloseFile(YouDataFile);
      end;
    end;
    二进制文件:
    var
      YouBFile:File;
    begin
      AssignFile(YouBFile,'FileName');
      Reset(YouBFile);
      try
        BlockRead(YouBFile,Buffer,1,Num);
      finally
        closefile(YouBFile);
      end;
    end;