如何得到当前运行的文件的绝对目录？

Question

如何得到当前运行的文件的绝对目录？
如：c:\1\1.exe 运行了，怎么获得他的绝对目录

Answer 1

ExtractFilePath(Application.Exename);
呵呵~~~~

Answer 2

ExtractFilePath(Application.EXEName)
ExtractFilePath(Application.EXEName)
ExtractFilePath(Application.EXEName)
ExtractFilePath(Application.EXEName)
ExtractFilePath(Application.EXEName)
ExtractFilePath(Application.EXEName)
ExtractFilePath(Application.EXEName)

Answer 3

var
  filepath : string;
begin
  filepath := ExtractFilePath(Application.ExeName);\\得到路径
end;

Answer 4

真是人多力量大，我今天才知道还有GetDir这样的函数。

Answer 5

不会吧，为什么你们都用ExtractFilePath，我觉得ExtractFileDir好用，连后面的'\'都不用再加了。

Answer 6

ExtractFilePath(Application.EXEName)

Answer 7

多谢!其实ExtractFilePath(Application.EXEName)
的方法贴了帖子后,我想起来了,不过,右晓得了GETDIR()的用法,也不错,揭帖了.