delphi - Delphi 中服务应用程序中给定文件的相对路径

Question

我在加载文件时遇到问题，因为我将相对路径传递给函数 FileExists(Filename: String) 并且它返回 false，也就是说，它没有在我传递的目录。

我在 D:\Programming\Delphi\Projects\SendMail 目录下有一个名为 Template.html 的文件，还有一个用 Delphi 编写的服务，其 . EXE 在D:\Programming\Delphi\Automation 目录下。我将相对路径:.\..\Projects\SendMail\Template.html 传递给 FileExists()，但它返回文件不存在。

我认为这与服务的相对路径和应用程序的相对路径不同有关。有人可以帮我解决这个问题吗？

Answer 1

正如 lorenzog 所说，请尝试指定完整路径。

您也可以尝试根据自己的喜好设置当前目录。

//sets currentdir to your application.exe dir
SetCurrentDir(ExtractFileDir(ParamStr(0)));