delphi 入门之《ini文件的操作》
2017-06-20 13:57:00 来源:巅疯时刻
收藏 我要投稿
delphi 入门之《ini文件的操作》
ini文件的操作包含添加、删除、修改、读取,ini文件很多语言的都封装有各自的操作方法,现在简单的记录下dephi下ini文件的操作,首先我们得清楚ini文件的保存方式,ini文件的包含一个section,一个key和一个value,在ini文件的保存方式为:
?
1 2 | [choj] // --- section HomeUrl=https: //blog.csdn.net/qq_38428623 //HomeUrl为key,=后面为value |
ini文件的添加
?
1 2 3 4 5 6 7 8 9 10 11 | /// --- 添加配置文件 --- procedure Tprint_MainForm.WriteIniFile(key:string; content:string); var filename:string; inifile:Tinifile; begin filename:=ExtractFileDir(Paramstr( 0 ))+ '\config.ini' ; inifile:=Tinifile.Create(Filename); inifile.WriteString( 'choj' ,key,content); end; |
ini文件的删除
?
1 2 3 4 5 6 7 8 9 10 11 | /// --- 删除配置文件 --- procedure Tprint_MainForm.DeleteIniFile(key:string; content:string); var filename:string; inifile:Tinifile; begin filename:=ExtractFileDir(Paramstr( 0 ))+ '\config.ini' ; inifile:=Tinifile.Create(Filename); inifile.DeleteKey( 'choj' ,key); end; |
ini文件的修改
修改和添加一致,传入需要修改的字符就可以了。
ini文件的读取
?
1 2 3 4 5 6 7 8 9 10 11 | /// --- 读取配置文件 --- function Tprint_MainForm.ReadIniFile(key:string):string; var filename:string; inifile:Tinifile; begin filename:=ExtractFileDir(Paramstr( 0 ))+ '\config.ini' ; inifile:=Tinifile.Create(Filename); Result:=inifile.ReadString( 'choj' ,key, '' ); end; |