DELPHI中的文本文件打开时,只能只读打开或者只写打开,没有可读可写打开吗?

解决方案 »

  1.   

    用FileStream,其中可以选择打开模式
      

  2.   

    function FileOpen(const FileName: string; Mode: LongWord): Integer;
    {$IFDEF MSWINDOWS}
    const
      AccessMode: array[0..2] of LongWord = (
        GENERIC_READ,
        GENERIC_WRITE,
        GENERIC_READ or GENERIC_WRITE);
      ShareMode: array[0..4] of LongWord = (
      

  3.   

    是两个函数能用OR连接????rewrite() or reset();?????
      

  4.   

    对于一般的文件,可以var
      f : file;
    begin
      AssignFile(f, FileName);
      FileMode  := fmOpenReadWrite;
      Reset(f, 1);
      ...
      CloseFile(f);
    end;rewrite纯粹多余文本文件的话……很久没按文本方式打开过文件了,没试过。从文件的seek和顺序操作方式上看,同时读写文本文件的实现会极复杂,很不现实,恐怕不会支持。在大内存和未知encoding的年代,用文本方式打开硬盘上的文件在我看来也是多余的