怎么获取程序所在的路径？请指点！

Question

请问：
    在Delphi中，怎么样获取程序自身所处的路径？如VB中可以用App.Path来取得程序当前路径,用App.Name还可以获得程序的名称，但在Delphi中用什么呢？有没有APP对象呀？

Answer 1

ExtractFilePath(ParamStr(0))返回本程序路径

Answer 2

ExtractFilePath(Application.ExeName)ExtractFileDir(Application.ExeName)    也是可以的。

Answer 3

getcurrentdir             //得到当前路径
application.exename       //得到当前的路径及EXE文件

Answer 4

ExtractFilePath(ParamStr(0))ParamStr()是取命令行参数的，第一个参数即为文件名。

Answer 5

同意楼上的 各位
但是 
ExtractFilePath(Application.ExeName)ExtractFileDir(Application.ExeName)    有点区别
具体你自己试验一下就 知道了 
有个 函数多一 个 “/”

Answer 6

ExtractFileDir(FileName: string):string; //最后没有"\"
ExtractFilePath(FileName:string):string; //最后 有 "\"
例：
 ExtractFilePath(ParamStr(0))
 ExtractFilePath('D:\test\tst.doc') ==> 'D:\test\'
 ExtractFileDir('D:\test\tst.doc')  ==>  'D:\test'