delphi 获取文件所在路径、文件名、扩展名等

SysUtils
ExtractFileDrive ：返回完整文件名中的驱动器，如"C:"
ExtractFilePath  ：返回完整文件名中的路径，最后带“/”，如"C:/test/"
ExtractFileDir     ：返回完整文件名中的路径，最后不带“/” ,如"C:/test"
ExtractFileName：返回完整文件名中的文件名称 (带扩展名)，如"test.txt"
ExtractFileExt     ：返回完整文件名中的文件扩展名（带.），如".txt"

ExpandUNCFileName ：返回含有网络驱动器的文件全路径
ExtractRelativePath ：返回相对路径，定义如下：
function ExtractRelativePath(const BaseName, DestName: string): string;
使用测试下如：
SysUtils.ExtractRelativePath('C:/test','C:/Test/TestRelativePath'):返回TestRelativePath
SysUtils.ExtractRelativePath('C:/Test/TestRelativePath','C:/test'):返回'../TestRelativePath'
SysUtils.ExtractRelativePath('C:/Test/TestRelativePath/','C:/test'):返回'../../TestRelativePath'

ExtractShortPathName :返回短文件名，即8+3，文件名长八位，扩展名为3号，为保持DOS系统兼容而存在

ChangeFileExt(ExtractFileName(Application.ExeName),''): 改扩展名位''

MatchesMask() 检查文件是否与指定的文件名格式匹配
原型：extern PACKAGE bool __fastcall MatchesMask(const AnsiString Filename, const AnsiString Mask); 
功能：检查文件是否与指定的文件名格式匹配 
参数：FileName:要处理的文件名；Mask:文件名格式，支持通配符 
  例：ShowMessage(MatchesMask("Lxf.exe","*.?x?));//显示"true"