本文整理自网络,侵删。
安卓读写INI文件
uses System.IoUtils
procedure TForm1.Button1Click(Sender: TObject);varIniFile:TIniFile;Count:Integer;begin
tryIniFile:=TIniFile.Create(TPath.GetHomePath+'\test.ini');Count:=IniFile.ReadInteger('Config','Count',0);Count:=Count+1;IniFile.WriteString('sec', 'TEL',' ');IniFile.WriteInteger('Config','Count',Count);finallyFreeAndNil(IniFile);end;end;
相关阅读 >>
Delphi 将对象转换为json字符串或tjsonobject
更多相关阅读请进入《Delphi》频道 >>