怎样得到当前工程运行是所在的目录！

Question

Delphi在启动应用程序时与C语言一样会传递命令行参数给应用程序，第一个参数（索引号为零）表示应用程序本身的文件名（包括完整的路径），这个String参数由函数ParamStr(0)返回。
　　顺便说一句，Delphi提供了分析文件名的多个函数，如果你需要从文件名中得到路径名，可用下面的两个函数，这两个函数有一点点微小的差别： ExtractFilePath(FileName:String)
该函数返回路径名，其结尾字符总是“\” 
ExtractFileDir(FileName:String)
该函数同样返回路径名，但不包括结尾的字符“\”，除非返回的路径是根目录。

Answer 1

var AppPath:string;
AppPath:=ExtractFileDir(Application.ExeName);

Answer 2

var AppPath:string;
AppPath:=ExtractFileDir(Application.ExeName);

Answer 3

getdir(0,thepath);//变量thepath就是得到的.exe的文件路径

Answer 4

ExtractFileDir(Application.ExeName);

Answer 5

用Windows API: GetCurrentDir();