什么代码可以让我找到已编译的可执行文件的目录?

Al *_*l C 0 delphi

...即使用户通过双击与可执行文件不同的目录中的关联文件来打开应用程序.我一直使用ExtractFilePath(Application.EXEName),但是在这种情况下这个函数不能正常工作.

And*_*and 5

ExeName回报ParamStr(0)这反过来又返回所产生的字符串GetModuleFileNamehModule设置为0.我看不出有任何理由为什么这不会在一个正常的应用程序.