常见文件处理之INI文件

 INI文件的结构如下

[小节名]
关键字=值

uses IniFiles;  {操作Ini文件需要引用TIniFile 的单元}

常用的方法

WriteString     写入字符串

WriteInteger  写入数字

WriteBool       写入布尔值

 

ReadString    读取字符串值

ReadInteger  读取数字

ReadBool      读取布尔值

 

ReadSections   读取小节列表

ReadSection    读取某小节下关键字列表

ReadSectionValues    读取某小节下所有内容列表,包括关键字和值

 

• 写入

var F:TIniFile; begin F := TIniFile.Create('c:/A.ini'); //如果文件存在则打开,如果不存在,当向其中写入数据时,将创建ini文件 F.WriteString('PersonInfo','姓名','张三'); F.WriteInteger('PersonInfo','年龄',20); F.WriteBool('PersonInfo','婚否',False); end;

• 读取:读取方法的第三个参数表示,当读取失败时,返回的结果,

var F:TIniFile; name:string; age:Integer; merry:Boolean; begin F := TIniFile.Create('c:/A.ini'); name := F.ReadString('PersonInfo','姓名','无名氏'); //当读取失败时,返回'无名氏',否则返回读取的值 age := F.ReadInteger('PersonInfo','年龄',20); merry := F.ReadBool('PersonInfo','婚否',False); end;

 

•  读取小节的列表

var F:TIniFile; List:TStringList; begin try List := TStringList.Create; F := TIniFile.Create('c:/A.ini'); F.ReadSections(List); //将小节依次读取到List中 ShowMessage(List.Text); //显示小节列表内容 finally List.Free; F.Free; end; end;

• 读取某小节下的关键字列表

 var F:TIniFile; List:TStringList; begin try List := TStringList.Create; F := TIniFile.Create('c:/A.ini'); F.ReadSection('PersonInfo',List); //将小节依次读取到List中 ShowMessage(List.Text); //显示'PersonInfo'小节下关键字列表内容 finally List.Free; F.Free; end; end;

•  读取某小节下所有内容列表,包括关键字和值

var F:TIniFile; List:TStringList; begin try List := TStringList.Create; F := TIniFile.Create('c:/A.ini'); F.ReadSectionValues('PersonInfo',List); //将小节依次读取到List中 ShowMessage(List.Text); //读取某小节下所有内容列表,包括关键字和值 finally List.Free; F.Free; end; end;

 

• 其它常用方法

1. EraseSection  删除某个小节
2. DeleteKey      删除关键字
3. SectionExists 判断某个章节是否存在
4. ValueExists   判断某个小节下的某个关键字是否存在