Day2 ini文件的使用

今天，觉得Ini文件有些门道，故而花了一定时间专研它，弄明白了该如何在我们所设计的程序中使用Ini文件，对于文件的使用，一般重要的是对其进行读和写操作。那么，今天就Ini文件来探究它的使用。
开发环境：Delphi7
使用前准备步骤：在你所开发的程序所在的目录下，先建立一个’文件名.ini’文件，比如：work.ini;
使用步骤如下：
1. 在unit.pas的uses下要有IniFiles,如下

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, Buttons,Registry, ExtCtrls,IniFiles,StrUtils;

2.在 Var 变量定义部分增加定义一行相应的变量：如：

var work:Tinifile;

3.在新建的form上随便拖一个控件，仅为测试并掌握Ini文件用法，在实际的运用中，根据需要在需要运用的地方使用，由于拖了个Button1按钮，截取Button1点击事件代码如下：

procedure TForm1.Button1Click(Sender: TObject);
var work:Tinifile;
    s1,s2,username,password,mobile:string;
     k:Integer;
begin
    { Filename:=ExtractFilePath(Paramstr(0))+program.ini；
     work:=Tinifile.Create(filename)；}
     work:=Tinifile.Create(extractfiledir(application.ExeName)+'\work.ini'); //打开并指明ini文件路径
     s1:=work.ReadString('datetime','year','19');    //读取ini文件
     s2:=work.ReadString('login','username','ddindngngg');
     showmessage(s1);
     showmessage(s2);
     //work.WriteString('c','b','a');
    // work.WriteString('wsq','ws',);
    //  work.WriteInteger('wsq','grade',66);
    // showmessage(inttostr(k));
   // work.WriteString('login','username','cheng');
   work.WriteString('login','username','cheng');     //写入ini文件
   work.WriteString('login','password','ilikedelphi');
   // work.WriteString('login','password','ilikedelphi');
   // showmessage(username);
    //showmessage(password);
(*基础知识回顾：
1.ini文件的结构：[小节名] 关键字=值，如[username] username1=Jack; INI 文件支持的字符串、整型数值、布尔值 3 种数据类型
2.定义方法如下：
（1）在 Interface 的 Uses 节必须增加 IniFiles；
（2）在 Var 变量定义部分增加定义一行相应的变量： myinifile:Tinifile;
3.打开Ini文件
myinifile:=Tinifile.create(program.ini);
4.必须注意的是，如果括号中的文件名没有指明路径的话，那么这个 Program.ini 文件会存储在 Windows 目录中，把 Program.ini 文件存储在应用程序当前目录中的方法是：为其指定完整的路径及文件名。下面的两条语句可以完成这个功能：
Filename:=ExtractFilePath(Paramstr(0))+program.ini；
myinifile:=Tinifile.Create(filename)；
或者myinifile:=Tinifile.Create(extractfiledir(application.ExeName)+'\program.ini')；这个是保存在当前运行程序的目录文件夹下；
5.读取：如下：vs、vi、vb 分别为 string、integer、boolean 类型。
6.Var s1,s2,username,password,mobile:string;
     i,j:Integer;
     k:boolean;
s1:=myinifile.Readstring(‘aaa’，’a2’，’1’)；
i:=myinifile.Readinteger(‘lesson’,’delphi’,90);
//i:=myinifile.Readinteger(小节名，关键字，缺省值)；
vb:=myinifile.Readbool(‘visible’,’caption’,’false’)；
7.同6读取一样，写也有三种，只是注意用法如下：
 work.WriteString('login','username','cheng');
 work.WriteString('login','password','ilikedelphi');
没有赋值
8.删除关键字
 work.DeleteKey(小节名，关键字)；
9.小节操作
增加一个小节可用写入的方法来完成，删除一个小节可用下面的对象方法：
myinifile.EraseSection(小节名)；
另外 Tinifile 类还提供了 3 种对象方法来对小节进行操作：
myinifile.readsection(小节名,TStrings 变量)； //可将指定小节中的所有关键字名读取至一个字符串列表变量中
myinifile.readsections(TStrings 变量)；//可将 INI 文件中所有小节名读取至一个字符串列表变量中去。
myinifile.readsectionvalues(小节名，TStrings 变量)；
{可将 INI 文件中指定小节的所有行（包括关键字、=、值）读取至一个字符串列表变量中去}。*)
end;

好的，今天就到这里了，相信到了现在，大家都该掌握了ini文件的用法律，很庆幸大家一起进步，共同进步，终究，是很好的。希望对有需要了解的有帮助，明天见吧！