请问各位高手,如何在DELPHI中生成INI文件?给分!!

解决方案 »

  1.   

    你可以看一下tinifile类的说明你说的用inifile.reate(欲生成文件路径就可以)
      

  2.   

    memo1.Lines.SaveToFile ('F:\a.ini');
      

  3.   

    uses IniFiles;//在前面要加入这个单元文件
    procedure TForm1.Button1Click(Sender: TObject);
    var
      MyIniFile: TIniFile;
    begin
      MyIniFile := TIniFile.Create('myapp.ini');//如果不存在,会自动创建一个的
      Memo1.Clear;
      MyIniFile.ReadSectionValues('Transfer', Memo1.Lines);
      if Memo1.Lines.Values['Title1'] <> 'Picture Painter' then
        MyIniFile.WriteString('Transfer', 'Title1', 'Picture Painter');
      MyIniFile.Free;
    end;
      

  4.   


    uses IniFiles;//在前面要加入这个单元文件
    procedure TForm1.Button1Click(Sender: TObject);
    var
      ini: TIniFile;
    begin
    ini:=Tinifile.Create(ExtractFilePath(ParamStr(0))+'\test.INI');//在程序的目录下
    end;