delphi ini文件的基礎讀寫。

一、在程序的exe下創建test.ini文件，文件內容如圖所示：

 

二、新建一個按鈕，並寫入如下代碼：

 

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs,IniFiles,StdCtrls; //首先要引用頭文件：IniFiles；
//--------------------------------------------------
//如下東西無改動。
type
  TForm1 = class(TForm)
    btn_ReadIni: TButton;
    procedure btn_ReadIniClick(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}
//以上東西無改動
//--------------------------------------------------


procedure TForm1.btn_ReadIniClick(Sender: TObject);
var
ZkyFileIni:TIniFile;//定義一個ini文件
ZkyIntIni:Integer; //用來存放ini上ZkyInt的值
ZkyStrIni:string;//用來存放ini上ZkyStr的值
ZkyIniAdd:string;//用來存放ini文件地址
begin
  ZkyIniAdd:=GetCurrentDir+'\test.ini';//存放ini的地址到ZkyIniAdd上
  //--------------------------------------------------
  //<文件變量名>：=TIniFile.Create(<ini文件實際地址>);
  //將ZkyFileIni與要操做的ini文件建立關聯性。
  //在不使用該文件後，須要使用語句將其關聯性進行釋放。
  //釋放語句格式爲：
  //<文件變量名>.Free();
  //--------------------------------------------------
  ZkyFileIni:=TIniFile.Create(PChar(ZkyIniAdd));

  //--------------------------------------------------
  //<變量名>:=<文件變量名>.ReadInteger('<ini文件中的結點名稱>','<ini文件中的左值>',<默認值>)
  //將ini文件中某個結點下的某個整型變量賦值給咱們的變量。
  //若是該變量沒有值，則將默認值賦值給咱們的變量。
  //--------------------------------------------------
  ZkyIntIni:= ZkyFileIni.ReadInteger('ZkyJD_1','ZkyInt',0);
  //將ini文件下，ZkyJD這個結點下的ZkyInt的右值賦給ZkyIntIni，若是ZkyInt沒有值，則默認將0賦值給ZkyIntIni

  ZkyStrIni:=ZkyFileIni.ReadString('ZkyJDg_2','ZkyStr','ZkyStr-1');

  ShowMessage(IntToStr(ZkyIntIni));
  ShowMessage(PChar(ZkyStrIni));

  //--------------------------------------------------
  //<文件變量名>.WriteInteger('結點名稱','左值',右值);
  //<文件變量名>.WriteString('結點名稱','左值','右值');
  //若是要寫進去的節點名稱或左值都沒有和ini文件中匹配的話，則建立一個新的結點或左值。
  //--------------------------------------------------
  ZkyFileIni.WriteInteger('ZkyJD_1','ZkyInt',999);
  ZkyFileIni.WriteString('ZkyJD_2','Zkykong','123');

  ZkyFileIni.free();

end;

end.

 

三、結果：

1）首先會彈出兩個框，分別讀出2和ZkyStr-1
2）從新打開test.ini文件，內容以下：