配置檔案中經常用到ini檔案，在VC中其函式分別為：

#include <Windows.h> //wince,WMobile.ppc不支援這幾個函式

寫入.ini檔案：bool WritePrivateProfileString(LPCTSTR lpAppName, LPCTSTR lpKeyName, LPCTSTR lpString, LPCTSTR lpFileName);

讀取.ini檔案：DWORD GetPrivateProfileString(LPCTSTR lpAppName, LPCTSTR lpKeyName, LPCTSTR lpDefaut, LPSTR lpReturnedString, DWORD nSize, LPCTSTR lpFileName);函式返回值為string的長度(long型),而從ini檔案獲得的字串則保留在目的緩衝器中

讀取整形值：UINT GetPrivateProfileInt(LPCTSTR lpAppName,LPCTSTR lpKeyName,INT nDefault,LPCTSTR lpFileName);

其中個引數的意思：

LPCTSTR lpAppName ------- INI檔案中的一個欄位名

LPCTSTR lpKeyName -------- lpAppName 下的一個鍵名，也就是裡面具體的變數名

LPCTSTR lpDefaut ----------如果沒有其前兩個引數值，則將此值賦給變數

LPSTR lpReturnedString --------接收INI檔案中的值的CString物件，即接收緩衝區

DWORD nSize ------接收緩衝區的大小

LPCTSTR lpFileName --------完整的INI檔案路徑名

LPCTSTR lpString ---------是鍵值，也就是變數的值， 必須為LPCTSTR或CString型別

例子：

CString StrName,Strtemp;

int nAge;

StrName = "jacky";

nAge = 13;

WritePrivateProfileString("Student","Name",StrName,"c://setting.ini");

結果：（INI檔案中顯示如下：）

[Student]

Name=jacky

讀取：

CString str;

GetPrivateProfileString(
   CString("Student"),
   CString("Name"),
   CString("NULL"),
   str.GetBuffer(MAX_LENGTH),
   MAX_LENGTH,
   CString("F://Program//Test_Read_ini//debug//hello.ini")
   );

結果：str = "jacky"；這裡需要注意點就是用完GetBuffer函式後一定要釋放(用str.ReleaseBuffer()函式)，不然後面再用到SName的其他子函式就會失靈。

3.讀入整型值要用另一個WINAPI函式:
UINT GetPrivateProfileInt(
LPCTSTR lpAppName,
LPCTSTR lpKeyName,
INT nDefault,
LPCTSTR lpFileName
);
　　這裡的引數意義與上相同.使用方法如下:

nStudAge=GetPrivateProfileInt("StudentInfo","Age",10,"c://stud//student.ini");

在GetPrivateProfileString最後一個引數是配置檔案路徑的引數，此路徑只能是絕對路徑，不能是相對路徑，但現在我需要是我的exe檔案能和我的配置檔案在一起。因此我使用了GetCurrentDirectory函式。

原始碼如下：

CString server_ip;
CString des="";
::GetCurrentDirectory(MAX_PATHLENGTH,des.GetBuffer(MAX_PATHLENGTH));
des.ReleaseBuffer();
des+=//config.ini;
GetPrivateProfileString("PhoneDemo","Server_IP","",server_ip.GetBufferSetLength(15),15,des);
server_ip.ReleaseBuffer();

注意：在這裡使用CString變數時，在使用完GetBuffer後，緊接著一定要使用ReleaseBuffer()函式，才可以進行其他的諸如字串+操作

　補充四點:

　　　1.INI檔案的路徑必須完整,檔名前面的各級目錄必須存在,否則寫入不成功,該函式返回 FALSE 值.

　　　2.檔名的路徑中必須為 // ,因為在VC++中, // 才表示一個 / .

　　　3.也可將INI檔案放在程式所在目錄,此時 lpFileName 引數為: ".//student.ini".

　　　4.從網頁中貼上原始碼時,最好先貼上至記事本中,再往VC中貼上,否則易造成編譯錯誤,開始時我也十分不解,好好的程式碼怎麼就不對呢?後來才找到這個方法.還有一些程式碼中使用了全形字元如:＜，＼等,也會
造成編譯錯誤.

INI檔案程式設計

    INI檔案在系統配置及應用程式引數儲存與設定方面，具有很重要的作用，所以視覺化的程式設計一族，如VB、VC、VFP、Delphi等都提供了讀寫INI檔案的方法，其中Delphi中操作INI檔案，最為簡潔，這是因為Delphi3提供了一個TInifile類，使我們可以非常靈活的處理INI檔案。

一、有必要了解INI檔案的結構：
;註釋
[小節名]
關鍵字=值
...
　 INI檔案允許有多個小節，每個小節又允許有多個關鍵字， "="後面是該關鍵字的值。
　 值的型別有三種：字串、整型數值和布林值。其中字串存貯在INI檔案中時沒有引號，
布林真值用1表示，布林假值用0表示。
　 註釋以分號";"開頭。
二、定義
　 1、在Interface的Uses節增加IniFiles；
　 2、在Var變數定義部分增加一行：
myinifile:Tinifile;
　 然後，就可以對變數myinifile進行建立、開啟、讀取、寫入等操作了。

三、開啟INI檔案

myinifile:=Tinifile.create('program.ini');

　 上面這一行語句將會為變數myinifile與具體的檔案 program.ini建立聯絡，然後，就可以通過變數myinifile，來讀寫program.ini檔案中的關鍵字的值了。值得注意的是，如果括號中的檔名沒有指明路徑的話，那麼這個Program.ini檔案會儲存在Windows目錄中,把Program.ini檔案儲存在應用程式當前目錄中的方法是：為其指定完整的路徑及檔名。下面的兩條語句可以完成這個功能：

Filename:=ExtractFilePath(Paramstr(0))+'program.ini';

myinifile:=Tinifile.Create(filename);

四、讀取關鍵字的值
　 針對INI檔案支援的字串、整型數值、布林值三種資料型別，TINIfiles類提供了三種不同的物件方法來讀取INI檔案中關鍵字的值。
　 假設已定義變數vs、vi、vb分別為string、 integer、boolean型別。

vs:=myinifile.Readstring('小節名','關鍵字',預設值);
vi:=myinifile.Readinteger('小節名','關鍵字',預設值);
vb:=myinifile.Readbool('小節名','關鍵字',預設值);

　 其中預設值為該INI檔案不存在該關鍵字時返回的預設值。

五、寫入INI檔案
　 同樣的，TInifile類也提供了三種不同的物件方法，向INI檔案寫入字串、整型數及布林型別的關鍵字。

myinifile.writestring('小節名','關鍵字',變數或字串值);
myinifile.writeinteger('小節名','關鍵字',變數或整型數值);
myinifile.writebool('小節名','關鍵字',變數或True或False);
　 當這個INI檔案不存在時，上面的語句還會自動建立該INI檔案。
六、刪除關鍵字
　 除了可用寫入方法增加一個關鍵字，Tinifile類還提供了一個刪除關鍵字的物件方法：
myinifile.DeleteKey('小節名','關鍵字');

七、小節操作
　 增加一個小節可用寫入的方法來完成，刪除一個小節可用下面的物件方法：
   myinifile.EraseSection('小節名');
　 另外Tinifile類還提供了三種物件方法來對小節進行操作：
　 myinifile.readsection('小節名',TStrings變數);可將指定小節中的所有關鍵字名讀取至一個字串列表變數中；
　 myinifile.readsections(TStrings變數);可將INI檔案中所有小節名讀取至一個字串列表變數中去。
　 myinifile.readsectionvalues('小節名',TStrings變數);可將INI檔案中指定小節的所有行（包括關鍵字、=、值）讀取至一個字串列表變數中去。

八、釋放
在適當的位置用下面的語句釋放myinifile：
myinifile.distory;
九、一個例項
　 下面用一個簡單的例子(如圖)，演示了建立、讀取、存貯INI檔案的方法。myini.ini檔案中包含有"程式引數"小節，和使用者名稱稱（字串）、是否正式使用者（布林值）和已執行時間（整型值）三個關鍵字。程式在窗體建立讀取這些資料，並在窗體釋放時寫myini.ini檔案。
　 附源程式清單
unit Unit1;
interface
uses
Windows,Messages,SysUtils,Classes,Graphics,Controls,Forms,Dialogs,inifiles,StdCtrls,ExtCtrls;

type
TForm1 = class(TForm)
    Edit1: TEdit;
    CheckBox1: TCheckBox;
    Edit2: TEdit;
    Label1: TLabel;
    Label2: TLabel;
    Timer1: TTimer;
    Label3: TLabel;
    procedure FormCreate(Sender: TObject);
    procedure FormDestroy(Sender: TObject);
    procedure Timer1Timer(Sender: TObject);
private
    { Private declarations }
public
    { Public declarations }
end;
var
Form1: TForm1;

implementation
var
myinifile:TInifile;
{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
var filename:string;
begin
filename:=ExtractFilePath(paramstr(0))+'myini.ini';
myinifile:=TInifile.Create(filename);
edit1.Text:= myinifile.readstring('程式引數','使用者名稱稱','預設的使用者名稱稱');
edit2.text:= inttostr(myinifile.readinteger('程式引數','已執行時間',0));
checkbox1.Checked:= myinifile.readbool('程式引數','是否正式使用者',False);
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
myinifile.writestring('程式引數','使用者名稱稱',edit1.Text);

myinifile.writeinteger('程式引數','已執行時間',strtoint(edit2.text));
myinifile.writebool('程式引數','是否正式使用者',checkbox1.Checked);
myinifile.Destroy;
end;

procedure TForm1.Timer1Timer(Sender: TObject);
begin
edit2.Text:=inttostr(strtoint(edit2.text)+1);
end;

end.
　 程式在Pwin95、Delphi3下除錯通過。