我正在使用Delphi 2009编写一个小应用程序来编辑HTML文件。随着
HypRef := '../../photos/myjpg.jpg'
If FileExists(ExpandFileName(HypRef)) then ...
我可以知道该文件是否存在。如果FileExists给出否定答案,是否有找到正确相对路径的函数?
答案 0 :(得分:10)
我认为你的意思是相对于主HTML文档的目录。您可以将SetCurrentDir()调用到包含主HTML文档的目录,或者您可以简单地将该路径添加到相对路径。
if FileExists(ExtractFilePath(MainDocument) + HypRef) then...
你真的不需要来调用ExpandFileName(),因为操作系统会正确解析'..'和'。'件。但是,如果您打算使用该路径进行标识,则应使用ExpandFileName()将它们全部化为。