.ini 文件未创建

Question

我已经开始使用 .ini 文件，因为我意识到它与 .txt 文件相比有许多优点。无论如何，我在谷歌上搜索了“delphi inifiles”，现在正在遵循 Delphi About 的指南。然而，尽管所有语法都是正确的，我尝试的第一行却给我带来了麻烦。

Delphi About 的代码：

IniFile := TIniFile.Create('myapp.ini') ;

我的代码：

IniFile := TIniFile.Create('SWEDISH_HOUSE_MAFIA.ini');

唯一的区别是 .ini 文件本身的名称。另外，是的，我有：

• 在“uses”子句中声明“IniFiles”
• （本地）声明 IniFile

我已将该代码放置在 FormCreate 下，但问题是程序运行时不会创建此 .ini 文件。有人知道可能是什么问题吗？我问过朋友，他说是权限问题。

额外详细信息：

• 操作系统 - Windows 7 Ultimate 64 位（管理权限）
• 程序存储在 -
• 我使用的我的文档 - Delphi 2010

Answer 1

第一个问题是只有当您向 ini 文件写入内容时才会创建该文件。我怀疑目前您没有调用 WriteXXX 方法之一。

另一个问题是，如果您没有限定路径，那么 TIniFile 将尝试在 Windows 目录中找到它，当然您无权在那里写入。 TIniFile 所基于的底层 API 是私有配置文件 API，它已被长期弃用，性能非常糟糕，并且充满了奇怪的问题。 文档指出：

如果 lpFileName 参数不包含文件的完整路径和文件名，WritePrivateProfileString 将在 Windows 目录中搜索该文件。如果该文件不存在，该函数将在 Windows 目录中创建该文件。

显然，您应该完全限定您的路径。

不过，我强烈建议您考虑使用 TMemIniFile 而不是 TIniFile，因为 TMemIniFile 避免了私有配置文件 API 的所有缺陷。

如果您确实切换到TMemIniFile，请记住在销毁ini文件之前调用UpdateFile，因为这会将设置保存到磁盘。否则，TMemIniFile 是 TIniFile 的直接替代品。

Answer 2

为了确保文件确实保存在磁盘上，
使用

IniFile.UpdateFile

Answer 3

1. 不要将 ini 保存到应用程序路径。使用 %APPDATA% 路径。在 Windows 文件夹 (Win3..XP) 中创建不带路径的 INI。在 Vista/7 上，这些文件被重定向到 \Users\[user]\some-magic-folder （除非您的程序作为“安装程序”运行）
2. 使用 TMemFile 将大大加快操作速度。你需要调用UpdateFile/Free来更新文件，但它要快得多

Answer 4

TForm1.btnWriteClick(Sender: TObject); 

var

    myINI : TINIFile;

begin 

    myINI := TINIFile.Create('Tryfolder\myini.ini');

    myINI.WriteString('Settings', 'Text Box', 'Whatever text');

    myINI.Free;

end;

就像答案 3 所说，你只需要向 ini 写入一个值:) 这对我有用（win 7 Ultimate 64 位）。