本文整理自网络，侵删。
DELPHI获取程序自身路径的函数
Delphi 在启动应用程序时与 C 语言一样会传递命令行参数给应用程序，第一个参数（索引号为零）表示应用程序本身的文件名（包括完整的路径），这个 String 参数由函数 ParamStr(0) 返回。
顺便说一句，Delphi 提供了分析文件名的多个函数，如果你需要从文件名中得到路径名，可用下面的两个函数，这两个函数有一点点微小的差别：
ExtractFilePath(FileName:String) 该函数返回路径名，其结尾字符总是“\”
ExtractFileDir(FileName:String) 该函数同样返回路径名，但不包括结尾的字符“\”，除非返回的路径是根目录。
例如：获取当前程序的路径时就应该这样写
var
patch:string;
………
patch:=ExtractFilePath(ParamStr(0));
如果调用同一目录下的aa.ini文件，就应该这样写
inifilename:string;
inifilename:=patch+'aa.ini';
相关阅读 >>
Delphi 2009 之 tcategorypanelgroup[4]: height
Delphi colorbox不需要系统那么多颜色，只想自定义显示其中几个，怎么做？
Delphi 网上获取北京时间 tinifile.readsection 方法在 android 下的应用及各种字符编码问题
Delphi sendmessage这个函数有很多奇妙的用途
Delphi unigui中cookies使用中文汉字的方法
Delphi几个进制相关的代码（hextoint、hextoasc）
更多相关阅读请进入《Delphi》频道 >>
