Delphi中TIniFile类用法

定义

1、在Interface的Uses节增加IniFiles；

2、在Var变量定义部分增加一行：myinifile:Tinifile;

打开INI文件

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

myinifile:=Tinifile.Create(filename);

读取关键字的值

INI文件支持的字符串、整型数值、布尔值三种数据类型

其中缺省值为该INI文件不存在该关键字时返回的缺省值

定义变量vs、vi、vb分别为string、integer、boolean类型

vs:=myinifile.Readstring('小节名','关键字',缺省值);

vi:=myinifile.Readinteger('小节名','关键字',缺省值);

vb:=myinifile.Readbool('小节名','关键字',缺省值);

写入INI文件

myinifile.writestring('小节名','关键字',变量或字符串值);

myinifile.writeinteger('小节名','关键字',变量或整型数值);

myinifile.writebool('小节名','关键字',变量或True或False);

删除关键字

myinifile.DeleteKey('小节名','关键字');

小节操作

// 删除一个小节

myinifile.EraseSection('小节名');  

//将小节中的所有关键字名读取至一个字符串列表变量中；

myinifile.readsection('小节名',TStrings变量);  

////将INI文件中所有小节名读取至一个字符串列表变量中去。

myinifile.readsections(TStrings变量);  

//将小节的键值对读取至一个字符串列表变量中去。

myinifile.readsectionvalues('小节名',TStrings变量);

释放INI文件

myinifile.Destroy;   也可以使用FreeAndNil(myinifile);