DELPHI基础:DELPHI中的INI文件编程计算机二级考试

文章作者 100test 发表时间 2009:04:09 22:58:27
来源 100Test.Com百考试题网

　　第一部分：INI文件的结构：
　　.——注释
　　[小节名]
　　关键字=值
　　...
　　►.---- INI文件允许有多个小节，每个小节又允许有多个关键字， “=”后面是该关键字的值。
　　►.---- 值的类型有三种：字符串、整型数值和布尔值。其中字符串存贮在INI文件中时没有引号，布尔真值用1表示，布尔假值用0表示。
　　►.---- 注释以分号“.”开头。
　　第二部分：
　　定义
　　►.---- 1、在Interface的Uses节增加IniFiles；
　　►.---- 2、在Var变量定义部分增加一行：
　　►.fileHandle:Tinifile.
　　►.---- 然后，就可以对变量fileHandle进行创建、打开、读取、写入等操作了。
　　下面是一个通过ini文件读取数据库设置的例子，通过这个例子可以使我们更好地理解。
　　procedure DBConfig(var server_name,db_name,user_id,user_pwd:string).
　　var
　　fileHandle:tinifile.
　　begin
　　fileHandle:=TIniFile.Create(GetCurrentDir() ’\\dbconfig.ini’).
　　server_name:=fileHandle.ReadString(’dbsettings’,’server_name’,’ZYF’).
　　db_name:=fileHandle.ReadString(’dbsettings’,’db_name’,’Al_Product’).
　　user_id:=fileHandle.ReadString(’dbsettings’,’user_id’,’tap’).
　　user_pwd:=fileHandle.ReadString(’dbsettings’,’user_pwd’,’tap’).
　　fileHandle.Destroy.
　　end.
　　注意：如果括号中的文件名没有指明路径的话，那么这个dbconfig.ini文件必须存储在Windows目录中,才能读出设定值，否则只有默认值，如果想把dbconfig.ini文件存储在应用程序当前目录中，读取的方法是：为其指定完整的路径及文件名。
　　除了应用上面的GetCurrentDir()方法，下面的两条语句也可以完成这个功能：
　　►.Filename:=ExtractFilePath(Paramstr(0)) ’program.ini’.
　　►.myinifile:=Tinifile.Create(filename).
　　这里主要用到了下面的方法来读取文件
　　——fileHandle:=TIniFile.Create(GetCurrentDir() ’\\dbconfig.ini’). //在当前工作目录下，创建一个INI文件
　　——filehandle.Readstring(’小节名’,’关键字’,缺省值). //读取一个关键字，可以指定缺省值
　　——fileHandle.Destroy //操作完毕，结束句柄
　　第三部分：其他操作
　　►. 写INI文件
　　同样的，TIniFile类也提供了三种不同的对象方法，向INI文件写入字符串、整型数及布尔类型的关键字。
　　fileHandle.WriteString(’小节名’,’关键字’,变量或字符串值).
　　fileHandle.WriteInteger(’小节名’,’关键字’,变量或整型数值).
　　fileHandle.WriteBool(’小节名’,’关键字’,变量或True或False).
　　当这个INI文件不存在时，还会自动创建该INI文件。
　　►. 删除关键字
　　---- 除了可用写入方法增加一个关键字，Tinifile类还提供了一个删除关键字的对象方法：
　　fileHandle.DeleteKey(’小节名’,’关键字’).
　　►. 小节操作
　　--- 增加一个小节可用写入的方法来完成，删除一个小节可用下面的对象方法：
　　fileHandle.EraseSection(’小节名’).
　　另外Tinifile类还提供了三种对象方法来对小节进行操作：
　　fileHandle.ReadSection(‘小节名’,TStrings变量).
　　可将指定小节中的所有关键字名读取至一个字符串列表变量中；
　　fileHandle. ReadSections(TStrings变量).
　　可将INI文件中所有小节名读取至一个字符串列表变量中去。
　　fileHandle.ReadSectionValues(’小节名’,TStrings变量).
　　可将INI文件中指定小节的所有行（包括关键字、=、值）读取至一个
　　字符串列表变量中去。
　　►. 释放:在适当的位置用下面的语句释放fileHandle：
　　fileHandle.Destroy.
　　2009年上半年全国计算机等级考试参考答案请进入计算机考试论坛
　　2009年上半年全国计算机等级考试报名信息汇总
　　2009年NCRE考试有新变化
　　2009年全国计算机等级考试-大纲
　　2009年上半年全国计算机二级考试试题及答案