安卓读写INI文件

标签：bsp   proc   ifile   free   procedure   orm   finally   button   conf   

安卓读写INI文件

uses System.IoUtils

procedure TForm1.Button1Click(Sender: TObject);
var
IniFile:TIniFile;
Count:Integer;
begin

try
IniFile:=TIniFile.Create(TPath.GetHomePath+‘\test.ini‘);
Count:=IniFile.ReadInteger(‘Config‘,‘Count‘,0);
Count:=Count+1;
IniFile.WriteString(‘sec‘, ‘TEL‘,‘ ‘);
IniFile.WriteInteger(‘Config‘,‘Count‘,Count);
finally
FreeAndNil(IniFile);
end;
end;

安卓读写INI文件

标签：bsp   proc   ifile   free   procedure   orm   finally   button   conf   

原文地址：http://www.cnblogs.com/hnxxcxg/p/7266824.html