如何在 FMX/Delphi 中使用 .ini 文件

Question

对于一个程序，我真的需要你的帮助。

我找到了一个 cross platform Delphi script 来在设备上保存和加载 INI 文件，这是为早期的 Delphi 版本制作的。

现在，我的问题是：它在我的 Windows 计算机上运行良好，但在 Android 上无法运行。主要问题是它不知道第 61 行 (FMX.Inifiles.Android) 上的单元引用，并且缺少这个单元，它无法继续。

有什么办法可以解决这个问题吗？

Answer 1

您可以使用IniFiles 单位。我已经在 android、windows 和 linux 上使用过它，它似乎工作正常。对于 android 上的文件路径，您可以使用以下内容： System.IOUtils.TPath.GetDocumentsPath + System.SysUtils.PathDelim + 'config.ini'

在adnroid上保存ini的代码示例：

procedure SaveSettingString(Section, Name, Value: string);
var
  ini: TIniFile;
begin
  ini := TIniFile.Create(System.IOUtils.TPath.GetDocumentsPath + System.SysUtils.PathDelim + 'config.ini');
  try
    ini.WriteString(Section, Name, Value);
  finally
    ini.Free;
  end;
end;

加载字符串示例：

function LoadSettingString(Section, Name, Value: string): string;
var
  ini: TIniFile;
begin
  ini := TIniFile.Create(System.IOUtils.TPath.GetDocumentsPath + System.SysUtils.PathDelim + 'config.ini');
  try
    Result := ini.ReadString(Section, Name, Value);
  finally
    ini.Free;
  end;
end;

在加载您设置的任何值时，如果该名称/键不存在，则将返回该值。