Delphi中文件名函數-路徑、名稱、子目錄、驅動器、擴展名

1、文件名函數
　　文件名函數可以對文件的名稱、所在子目錄、驅動器和擴展名等進行操作。下表列出這些函數及其功能。
(**** 轉載敬請註明－本文出處：南山古桃(nsgtao)的百度空間：http://hi.baidu.com/nsgtao/ ****)
函數 說明
ExpandFileName() 返回文件的全路徑(含驅動器、路徑)
ExtractFileExt() 從文件名中抽取擴展名
ExtractFileName() 從文件名中抽取不含路徑的文件名
ExtractFilePath() 從文件名中抽取路徑名
ExtractFileDir() 從文件名中抽取目錄名
ExtractFileDrive() 從文件名中抽取驅動器名
ChangeFileExt() 改變文件的擴展名
ExpandUNCFileName() 返回含有網絡驅動器的文件全路徑
ExtractRelativePath() 從文件名中抽取相對路徑信息
ExtractShortPathName() 把文件名轉化爲DOS的8·3格式
MatchesMask() 檢查文件是否與指定的文件名格式匹配

ExtractFilePath(FileName:String)
該函數返回路徑名，其結尾字符總是“\”

ExtractFileDir(FileName:String)
該函數同樣返回路徑名，但不包括結尾的字符“\”，除非返回的路徑是根目錄。

　　下面就把這些函數作一一介紹：
(**** 轉載敬請註明－本文出處：南山古桃(nsgtao)的百度空間：http://hi.baidu.com/nsgtao/ ****)
⑴ExpandFileName()
　　原型：extern PACKAGE AnsiString __fastcall ExpandFileName(const AnsiString FileName);
***南山古桃（nsgtao)的百度空間：http://hi.baidu.com/nsgtao/ ***
　　功能：返回文件的全路徑(含驅動器、路徑)

　　參數：FileName:要處理的文件名

　　例：ShowMessage(ExpandFileName(Application->ExeName));//顯示你的程序文件名，如C:\MyBCB\Sample1.EXE

⑵ExtractFileExt()
　　原型：extern PACKAGE AnsiString __fastcall ExtractFileExt(const AnsiString FileName);

　　功能：從文件名中抽取擴展名

　　參數：FileName:要處理的文件名（全路徑）

　　例：ShowMessage(ExtractFileExt(Application->ExeName));//顯示".exe"

⑶ExtractFileName()
　　原型：extern PACKAGE AnsiString __fastcall ExtractFileName(const AnsiString FileName);

　　功能：從文件名中抽取不含路徑的文件名

　　參數：FileName:要處理的文件名

　　例：ShowMessage(ExtractFileExt("c:\\Winnt\\SOL.EXE"));//顯示"SOL.EXE"
(**** 轉載敬請註明－本文出處：南山古桃(nsgtao)的百度空間：http://hi.baidu.com/nsgtao/ ****)
⑷ExtractFilePath()
　　原型：extern PACKAGE AnsiString __fastcall ExtractFilePath(const AnsiString FileName);

　　功能：從文件名中抽取路徑名

　　參數：FileName:要處理的文件名

　　例：ShowMessage(ExtractFilePath("Winnt\\SOL.EXE"));//顯示"Winnt\"

⑸ExtractFileDir()
　　原型：extern PACKAGE AnsiString __fastcall ExtractFileDir(const AnsiString FileName);

　　功能：從文件名中抽取目錄名(和上個函數不同，不包括最後的"\")

　　參數：FileName:要處理的文件名

　　例：ShowMessage(ExtractFileDir("Winnt\\SOL.EXE"));//顯示"Winnt",注意和上個函數的區別

⑹ExtractFileDrive()
　　原型：extern PACKAGE AnsiString __fastcall ExtractFileDrive(const AnsiString FileName);

　　功能：從文件名中抽取驅動器名

　　參數：FileName:要處理的文件名

　　例：ShowMessage(ExtractFileDrive("c:\\Winnt\\SOL.EXE"));//顯示"c:"

⑺ChangeFileExt()
　　原型：extern PACKAGE System::AnsiString __fastcall ChangeFileExt(const System::AnsiString FileName, const System::AnsiString Extension);

　　功能：更改文件名的擴展名，不是對真正的文件進行改名，只是對文件名這個字符串進行處理

　　參數：FileName:要改名的文件名，Extension：新的擴展名

　　例：ShowMessage(ChangeFileExt("c:\\Winnt\\SOL.EXE",".OOO"));//顯示"c:\winnt\SOL.OOO"

⑻ExpandUNCFileName()
　　原型：extern PACKAGE AnsiString __fastcall ExpandUNCFileName(const AnsiString FileName);

　　功能：返回含有網絡驅動器的文件全路徑，格式爲：\\機器名\共享名\文件名

　　參數：FileName:要處理的文件名

　　例：ShowMessage(ExpandUNCFileName("F:\\Winnt\\SOL.EXE"));/*如果F:是映射的網絡驅動器\\NT40\WINNT，則顯示"\\NT40\WINNT\SOL.EXE"*/

⑼ExtractRelativePath()
　　原型：extern PACKAGE AnsiString __fastcall ExtractRelativePath(const AnsiString BaseName, const AnsiString DestName);

　　功能：從文件名中抽取相對路徑信息，如"..\sss\ss.asd"這種形式

　　參數：BaseName：基準文件名；DestName：目標文件名

　　例：ShowMessage(ExtractRelativePath("D:\\Source\\c\\1.123","D:\\Source\\Asm\\dz.asm"));/*顯示"..\asm\dz.asm"*/
(**** 轉載敬請註明－本文出處：南山古桃(nsgtao)的百度空間：ttp://hi.baidu.com/nsgtao/ ****)
⑽ExtractShortPathName()
　　原型：extern PACKAGE AnsiString __fastcall ExtractShortPathName(const AnsiString FileName);

　　功能：把文件名轉換爲DOS的8、3格式

　　參數：FileName:要處理的文件名

　　例：ShowMessage(ExtractShortPathName("E:\\Program Files\\Dual Wheel Mouse\\4dmain.exe"));/*顯示"E:\Progra~1\dualwh~1\4dmain.exe"*/

⑾MatchesMask()
　　原型：extern PACKAGE bool __fastcall MatchesMask(const AnsiString Filename, const AnsiString Mask);

　　功能：檢查文件是否與指定的文件名格式匹配

　　參數：FileName:要處理的文件名；Mask:文件名格式，支持通配符

　　例：ShowMessage(MatchesMask("Lxf.exe","*.?x?));//顯示"true"