delphi - Delphi 使用 ExtractFilePath 上一个目录

Question

我正在使用这段代码：

str := ExtractFilePath(ParamStr(0)) + '\Connection.ini';

获取.ini文件的路径，但我想增加 2 个目录，因此该.ini文件不位于 DEBUG 文件夹中。

我试过这个：

str := ExtractFilePath(ParamStr(0)) + '\..\..\Connection.ini';

但是没有用...

标签： delphi

Answer 1

上一个目录有很多可能性。其中一些包括：

str := ExtractFilePath(ExtractFilePath(ParamStr(0))) + '\Connection.ini';

或者

str := IncludeTrailingPathDelimiter(ExtractFilePath(ExtractFilePath(ParamStr(0)))) + 'Connection.ini';

或者

str := ExtractFilePath(ParamStr(0)) + '\..\Connection.ini';