delphi ini文件的基础读写。
来源:互联网 发布:喜扑传奇翅膀升级数据 编辑:程序博客网 时间:2024/06/07 01:20
1、在程序的exe下建立test.ini文件,文件内容如图所示:
2、新建一个按钮,并写入以下代码:
unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs,IniFiles,StdCtrls; //首先要引用头文件:IniFiles;//--------------------------------------------------//以下东西无改动。type TForm1 = class(TForm) btn_ReadIni: TButton; procedure btn_ReadIniClick(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}//以上东西无改动//--------------------------------------------------procedure TForm1.btn_ReadIniClick(Sender: TObject);varZkyFileIni:TIniFile;//定义一个ini文件ZkyIntIni:Integer; //用来存放ini上ZkyInt的值ZkyStrIni:string;//用来存放ini上ZkyStr的值ZkyIniAdd:string;//用来存放ini文件地址begin ZkyIniAdd:=GetCurrentDir+'\test.ini';//存放ini的地址到ZkyIniAdd上 //-------------------------------------------------- //<文件变量名>:=TIniFile.Create(<ini文件实际地址>); //将ZkyFileIni与要操作的ini文件创建关联性。 //在不使用该文件后,需要使用语句将其关联性进行释放。 //释放语句格式为: //<文件变量名>.Free(); //-------------------------------------------------- ZkyFileIni:=TIniFile.Create(PChar(ZkyIniAdd)); //-------------------------------------------------- //<变量名>:=<文件变量名>.ReadInteger('<ini文件中的结点名称>','<ini文件中的左值>',<默认值>) //将ini文件中某个结点下的某个整型变量赋值给我们的变量。 //如果该变量没有值,则将默认值赋值给我们的变量。 //-------------------------------------------------- ZkyIntIni:= ZkyFileIni.ReadInteger('ZkyJD_1','ZkyInt',0); //将ini文件下,ZkyJD这个结点下的ZkyInt的右值赋给ZkyIntIni,如果ZkyInt没有值,则默认将0赋值给ZkyIntIni ZkyStrIni:=ZkyFileIni.ReadString('ZkyJDg_2','ZkyStr','ZkyStr-1'); ShowMessage(IntToStr(ZkyIntIni)); ShowMessage(PChar(ZkyStrIni)); //-------------------------------------------------- //<文件变量名>.WriteInteger('结点名称','左值',右值); //<文件变量名>.WriteString('结点名称','左值','右值'); //如果要写进去的节点名称或左值都没有和ini文件中匹配的话,则创建一个新的结点或左值。 //-------------------------------------------------- ZkyFileIni.WriteInteger('ZkyJD_1','ZkyInt',999); ZkyFileIni.WriteString('ZkyJD_2','Zkykong','123'); ZkyFileIni.free();end;end.
1)首先会弹出两个框,分别读出2和ZkyStr-1
2)重新打开test.ini文件,内容如下:
0 0
- delphi ini文件的基础读写。
- Delphi读写ini文件
- Delphi读写INI文件
- Delphi INI 文件读写
- delphi读写INI文件
- Delphi INI 文件读写
- Delphi INI 文件读写
- DELPHI中对INI文件的读写
- DELPHI中对INI文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- Delphi中初始化.Ini文件的读写
- 读书笔记 effective c++ Item 25 实现一个不抛出异常的swap
- 2014年北京Itcast-IOS4期视频教程
- 打开word2010出现进度条的解决办法
- Codeforces Round #403 (Div. 2)B. The Meeting Place Cannot Be Changed
- 单列
- delphi ini文件的基础读写。
- css之vertical-align
- Thread线程-创建线程的3种方式
- MongoDB Java 笔记
- php网页模板设计
- iBET Sport Books Rebate 0.35% Bonus
- 转发和重定向的区别(简单解释)
- STM32F4修改晶振频率
- STL 一般总结