请问delphi怎么自定义文件格式！请给个demo，谢谢了，有分！

假如我现在想建立一个文件为info.xx 里面保存name,pass,add==
请问怎么操作呢。怎么读写！请老大们给个demo!

解决方案 »

  1.   

    info.ini[info]
    name=.....
    pass=.......
    add=.......
    procedure TForm1.Button1Click(Sender: TObject);
    var
      GameIni: TIniFile;
    begin
      Gameini := TIniFile.Create('info.ini');
      with GameIni do
      begin
        WriteString('info', 'name','asdfasdf');
        WriteInteger('info', 'pass', 3);
        WriteBool('info', 'add', True);
        Free;
      end;end;
      

  2.   

    老大不是要ini格式的。是自定义格式的比如说info.qq 
      

  3.   

    Trec=record
      name :string[30];
      pass : string[30];
      add:string[30];
    end;VAR
    mfile: file of trec;
    begin
      assignfile(mfile,FILEName);//FILENAME随便起名
      rewrite(mfile);
      write(mfile,rec);
      closefile(mfile);
    END;
      

  4.   

    自定义文件格式并不是什么要遵循什么标准，所有的文件都可以看做数据流，只要能保证你存储的数据自己能够读取就ok
    如果只是保存一些简单的信息那么xml和ini足够了，如果你要保存的数据很大结构复杂或者要求存储速度那么就自定义一个流
    通常分成2部分，前面一部分做检索用后面一部分存储真实的数据
      

  5.   

    就是自己能正常写能正常读就行了，闭门造车，不用告诉别人record的数组比较合适