delphi FireMonkey移动应用程序将设置保存到INI文件的示例

这是一个使用FireMonkey移动应用程序将设置保存到INI文件的示例。

已经确认可以与Delphi XE6和Android一起使用。

使用TPath.GetDocumentsPath函数获取用于保存INI文件的目录。

为防止出现乱码，请为字符代码指定UTF-8。

其余部分与Windows相同。

使用单位

uses System.IOUtils, System.IniFiles;

保存设置

procedure TForm1.Button2Click(Sender: TObject);

var

IniFile: TMemIniFile;

begin

IniFile := TMemIniFile.Create(TPath.Combine(TPath.GetDocumentsPath,

'test.ini'), TEncoding.UTF8);

try

IniFile.WriteString('SECTION', 'STRING', '文字列');

IniFile.WriteInteger('SECTION', 'INTEGER', 999);

IniFile.UpdateFile;

finally

IniFile.Free;

end;

加载设置

procedure TForm1.Button3Click(Sender: TObject);

var

IniFile: TMemIniFile;

S: string;

I: Integer;

begin

IniFile := TMemIniFile.Create(TPath.Combine(TPath.GetDocumentsPath,

'test.ini'), TEncoding.UTF8);

try

S := IniFile.ReadString('SECTION', 'STRING', '');

I := IniFile.ReadInteger('SECTION', 'INTEGER', 0);

finally

IniFile.Free;

end;

推荐分享