如何将一个INI文件的内容全部清空,以便重写?

解决方案 »

  1.   

    Window只能EraseSection要不Rewrite这个文件
    Linux中Clear
      

  2.   

    var
      MyIniFile: TIniFile;
      sjkmc,constr,password,username:string;
      filename:string;
      begin
      filename:=extractfilepath(paramstr(0))+'数据库配置.ini';
      if fileexist(filename) then deleltefile(filename);
      MyIniFile := TIniFile.Create(extractfilepath(paramstr(0))+'数据库配置.ini');
     sjkmc:='lllll';
      username:='dfdf';
     password:='df';  //以上三个反正是你想写的串
       MyIniFile.WriteString('数据库配置','数据库服务器名称',sjkmc);
       MyIniFile.WriteString('数据库配置','用户名',username);
       MyIniFile.WriteString('数据库配置','密码',password);
       end;
      myIniFile.Free;
      

  3.   

    FileAssign();
    Rewrite(f);
    CloseFile(f);
      

  4.   

    向INI文件重新写入一次不就完了吗?
    var F: TextFile;begin
      AssignFile(F, 'NEWFILE.INI');
      Rewrite(F);
      CloseFile(F);
    end;