delphi中rewrite怎么用的啊,参数到底怎么回事啊,郁闷

解决方案 »

  1.   

    var
      f: TextFile;
    begin
      AssignFile(f,'c:\ww.txt');
      rewrite(f);
      closefile(f);
    end;
      

  2.   

    var F: TextFile;begin
      AssignFile(F, 'NEWFILE.$$$');
      Rewrite(F);
      Writeln(F, 'Just created file with this text in it...');
      CloseFile(F);
    end;
      

  3.   

    我那样用了出错的
    assignfile(PassWdFile,FilePath);
        rewrite(PassWdFile);
        write(PassWdFile,editnew.text);
        closefile(PassWdFile);
        showMessage('密码设置成功!');
        close;
    他说我I/O EREOR 32
      

  4.   

    而且出错位置志向 rewrite(PassWdFile);
      

  5.   

    rewrite(PassWdFile);改为reset(PassWdFile);试试,
    或者在下面写
    Append(PassWdFile);
      

  6.   

    reset(PassWdFile);打开的文件好象是只读的,我想接下来写文件,而且要把以前的内容覆盖掉
      

  7.   

    var F: TextFile;begin
      AssignFile(F, 'NEWFILE.$$$');
      Rewrite(F);
      Writeln(F, 'Just created file with this text in it...');
      CloseFile(F);
    end;这个是Delphi帮助的例子,应该没错的,你检查一下你打开的文件对不对?