ExpandFileName(Application.ExeName);//返回文件的全路径(含驱动器、路径) D:\delphi程序\20170427\Win32\Debug\MyTestProject.exe
ExtractFileExt(Application.ExeName); //从文件名中抽取扩展名 .exe
ExtractFileName(Application.ExeName); //从文件名中抽取不含路径的文件名 MyTestProject.exe
ExtractFilePath(Application.ExeName);// 从文件名中抽取路径名 D:\delphi程序\20170427\Win32\Debug\
ExtractFileDir(Application.ExeName);// 从文件名中抽取目录名 D:\delphi程序\20170427\Win32\Debug
ExtractFileDrive(Application.ExeName);// 从文件名中抽取驱动器名 D:
ChangeFileExt(ExtractFilePath(Application.ExeName)+‘aaa.txt‘,‘.bbb‘);// 改变文件的扩展名 D:\delphi程序\20170427\Win32\Debug\aaa.bbb
ExpandUNCFileName(Application.ExeName);// 返回含有网络驱动器的文件全路径 D:\delphi程序\20170427\Win32\Debug\MyTestProject.exe
ExtractRelativePath(‘d:\abc\123‘,‘d:\abc‘);// 从文件名中抽取相对路径信息
ExtractShortPathName(Application.ExeName);// 把文件名转化为DOS的8·3格式 D:\delphi程序\20170427\Win32\Debug\MyTestProject.exe
MatchesMask(‘http://www.132435.com‘,‘*.132435.com‘));// 检查文件是否与指定的文件名格式匹配 true

delphi获取文件路径