请问ini文件如何使用

Question

见过不少程序使用ini文件，里面用[××]分类，下面就不少设置等。想问大家在程序中如何使用他们,谢谢？
例如：
[A]
Name=jacky
Age=13
[B]
School=JH

Answer 1

晕，漏了贴连接：http://community.csdn.net/Expert/topic/3149/3149236.xml?temp=.9323236

Answer 2

主要是把软件进行的基本的设置保存起来
然后在软件运行时读取
[system]
border=1
读取border＝1时文本框的BorderStyle=1
显示为平面

Answer 3

下面是INI文件的读与写的一段代码.
Private Declare Function GetPrivateProfileString Lib "Kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, lpKeyName As Any, ByVal lpDefault As String, ByVal lpRetunedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long
Private Declare Function WritePrivateProfileString Lib "Kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lplFileName As String) As LongPrivate r As Long
Private entry As String
Private iniPath As StringFunction GetFromINI(AppName As String, KeyName As String, FileName As String) As String
   Dim RetStr As String
   RetStr = String(255, Chr(0))
   GetFromINI = Left(RetStr, GetPrivateProfileString(AppName, ByVal KeyName, "", RetStr, Len(RetStr), FileName))
End FunctionPrivate Sub Command1_Click()
    Text1.Text = GetFromINI("A", "Name", iniPath)
End SubPrivate Sub Command4_Click()
    entry$ = Text1.Text
    r = WritePrivateProfileString("A", "Name", entry, iniPath)
    If r <> 1 Then MsgBox "写出错！"
End Sub