本文整理自网络，侵删。
在Delphi SysUtils 单元中有 ExtractFileDir 与 ExtractFilePath两个类似的函数, 两个函数有以下的区别:
ExtractFilePath 传回值的最後一个字元是反斜杠“\”。
ShowMessage(ExtractFileDir(Application.Exename)); // 返回值为 c:\temp
ShowMessage(ExtractFilePath(Application.Exename)); // 返回值为 c:\temp\
相同点： 如果执行文件在根目录下(如：C:\SAMPLE.EXE)的话, 两者的传回值相同， 且最后一个字符都是“\”。
===============================================================================
edit1.Text:=ParamStr(0);//自己全路径c:\555\qq.exe,可用于控制台
edit1.text:=ExpandFileName(ParamStr(0)); //获取本程序的完整路径 c:\qq\2.exe
edit2.text:=ExtractFileDir(ParamStr(0)); //获取本程序的路径 c:\qq
edit3.text:=application.Exename; //获取本程序的完整路径 c:\qq\2.exe,和第1个一样
edit4.text:=ExtractFilename(Application.Exename); //获得文件名2.exe
相关阅读 >>
Delphi 选择目录对话框（selectdirectory 函数）
Delphi 2009 新增单元 character[1]: toupper、tolower - 字符与字符串的大小写转换
Delphi中combobox.items.indexof用法
Delphi 判断字符是否是汉字,bytetype字符串中判断是否英文
更多相关阅读请进入《Delphi》频道 >>
