BCB提供的文件操作的庫函數

BCB提供的文件操作的庫函數


在BCB中也提供了文件操作的函數，這些函數的功能和前面所介紹的大致相同，但這類函數和BCB關係緊密，能使用BCB中的AnsiString等數據類型，在BCB中用這種方式的文件操作是最方便的，下面我就把這種文件操作詳細介紹。　　在BCB提供的這組文件操作函數中，可分爲三種類型，就是：1、文件名函數，2、文件管理函數；3、文件I/O函數。
　　1、文件名函數
　　文件名函數可以對文件的名稱、所在子目錄、驅動器和擴展名等進行操作。下表列出這些函數及其功能。
　　函數 說明
　　ExpandFileName() 返回文件的全路徑(含驅動器、路徑)
　　ExtractFileExt() 從文件名中抽取擴展名
　　ExtractFileName() 從文件名中抽取不含路徑的文件名
　　ExtractFilePath() 從文件名中抽取路徑名
　　ExtractFileDir() 從文件名中抽取目錄名
　　ExtractFileDrive() 從文件名中抽取驅動器名
　　ChangeFileExt() 改變文件的擴展名
　　ExpandUNCFileName() 返回含有網絡驅動器的文件全路徑
　　ExtractRelativePath() 從文件名中抽取相對路徑信息
　　ExtractShortPathName() 把文件名轉化爲DOS的8·3格式
　　MatchesMask() 檢查文件是否與指定的文件名格式匹配


　　下面就把這些函數作一一介紹：
　　⑴ExpandFileName()
　　原型：extern PACKAGE AnsiString __fastcall ExpandFileName(const AnsiString FileName);
　　功能：返回文件的全路徑(含驅動器、路徑)
　　參數：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"
　　⑷ExtractFilePath()
　　原型：extern PACKAGE AnsiString __fastcall ExtractFilePath(const AnsiString FileName);
　　功能：從文件名中抽取路徑名---www.bianceng.cn
　　參數：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"*/
　　⑽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);
　　功能：檢查文件是否與指定的文件名格式匹配---www.bianceng.cn
　　參數：FileName:要處理的文件名；Mask:文件名格式，支持通配符
　　例：ShowMessage(MatchesMask("Lxf.exe","*.?x?));//顯示"true"
　　--------------------------------------------------------------------------------
　　2、文件管理函數
　　這類函數包括設置和讀取驅動器、子目錄和文件的有關的各種操作，下表列出這類操作常用的函數及其功能。
　　函數 功能
　　CreateDir() 創建新的子目錄
　　DeleteFile() 刪除文件
　　DirectoryExists() 判斷目錄是否存在
　　DiskFree() 獲取磁盤剩餘空間
　　DiskSize() 獲取磁盤容量
　　FileExists() 判斷文件是否存在
　　FileGetAttr() 獲取文件屬性
　　FileGetDate() 獲取文件日期
　　GetCurrentDir() 獲取當前目錄
　　RemoveDir() 刪除目錄
　　SetCurrentDir() 設置當前目錄
　　下面就把這些函數作一一介紹：
　　⑴CreateDir()
　　原型：extern PACKAGE bool __fastcall CreateDir(const System::AnsiString Dir);
　　功能：建立子目錄，如果成功返回true，否則返回false
　參數：Dir:要建立的子目錄的名字
　　例：Create("ASM");//在當前目錄下建立一個名爲ASM的子目錄
　　⑵DeleteFile()
　　原型：extern PACKAGE bool __fastcall DeleteFile(const System::AnsiString FileName);
　　功能：刪除文件，如果成功返回true，否則返回false
　　參數：FileName:要刪除的文件名
　　例：if(OpenDialog1->Execute())DeleteFile(OpenDialog1->FileName);
　　⑶DirectoryExists()
　　原型：extern PACKAGE bool __fastcall DirectoryExists(const System:: AnsiString Name);
　　功能：檢測目錄是否存在，如果存在返回true，否則返回false
　　參數：Name:要檢測的目錄名
　　例：if(!DirectoryExists("ASM"))CreateDir("ASM");//如果ASM這個目錄不存在則創建之
　　⑷DiskFree()
　　原型：extern PACKAGE __int64 __fastcall DiskFree(Byte Drive);
　　功能：檢測磁盤剩餘空間，返回值以字節爲單位，如果指定的磁盤無效，返回-1
　　參數：Drive：磁盤的代號，0表示當前盤, 1=A,2=B,3=C 以此類推
　　例：ShowMessage(DiskFree(0));//顯示當前盤的剩餘空間
　　⑸DiskSize()
　　原型：extern PACKAGE __int64 __fastcall DiskSize(Byte Drive);
　　功能：檢測磁盤容量，返回值以字節爲單位，如果指定的磁盤無效，返回-1
　　參數：Drive：磁盤的代號，0表示當前盤, 1=A,2=B,3=C 以此類推
　　例：ShowMessage(DiskFree(0));//顯示當前盤的容量
　　⑹FileExists()
　　原型：extern PACKAGE bool __fastcall FileExists(const AnsiString FileName);
　　功能：檢測文件是否存在，如果存在返回true，否則返回false
參數：FileName:要檢測的文件名
　　例：if(FileExists("AAA.ASM"))DeleteFile("AAA.ASM");
　　⑺FileGetAttr()
　　原型：extern PACKAGE int __fastcall FileGetAttr(const AnsiString FileName);
　　功能：取得文件屬性，如果出錯返回-1
　　返回值如下表，如果返回$00000006表示是一個具有隱含和系統屬性的文件(4+2)
　　常量 值 含義
　　faReadOnly $00000001 只讀文件
　　faHidden $00000002 隱含文件
　　faSysFile $00000004 系統文件
　　faVolumeID $00000008 卷標
　　faDirectory $00000010 目錄
　　faArchive $00000020 歸檔文件
　　例：if(FileGetAttr("LLL.TXT")&0x2)ShowMessage("這是一個有隱含屬性的文件");
　　與此對應的有FileSetAttr() ，請自已查閱幫助系統
　　⑻FileGetDate()
　　原型：extern PACKAGE int __fastcall FileGetDate(int Handle);
　　功能：返回文件的建立時間到1970-1-1日0時的秒數
　　參數：Handle:用FileOpen()打開的文件句柄。
　　例：
　　int i=FileOpen("C://autoexec.bat",fmOpenRead);
　　ShowMessage(FileGetDate(i));
　　FileClose(i);
　　與此對應的有FileSetDate()，請自已查閱幫助系統
　　⑼GetCurrentDir()
　　原型：extern PACKAGE AnsiString __fastcall GetCurrentDir();
　　功能：取得當前的目錄名
　　例：ShowMessage(GetCurrentDir());
　　⑽RemoveDir()
　　原型：extern PACKAGE bool __fastcall RemoveDir(const AnsiString Dir);
　　功能：刪除目錄，如果成功返回true，否則返回false
參數：Dir:要刪除的目錄名
　　例：if(DiectoryExists("ASM"))RemoveDir("ASM");
　　⑾SetCurrentDir()
　　原型：extern PACKAGE bool __fastcall SetCurrentDir(const AnsiString Dir);
　　功能：設置當前目錄，如果成功返回true，否則返回false
　　參數：Dir:要切換到的目錄名
　　例：SetCurrentDir("C://WINDOWS");
　　--------------------------------------------------------------------------------
　　3、文件I/O函數
　　這類函數完成對文件的讀寫相關的操作，這種類型的操作和C的基於I/O文件操作類似，下表列出這類操作常用的函數及其功能。
　　FileOpen() 打開文件
　　FileClose() 關閉文件
　　FileRead() 讀文件
　　FileSeek() 文件定位
　　FileWrite() 寫文件
　　FileCreate() 創建文件
　　下面就對這些函數作詳細介紹。
　　⑴FileOpen()
　　原型：extern PACKAGE int __fastcall FileOpen(const AnsiString FileName, int Mode);
　　功能：打開文件，如果成功返回其句柄，否則返回-1
　　參數：FileName:要打開的文件名；Mode：打開的方式，取值如下表，可用"或"("|")運算符連接。
　　常量 值 說明
　　-------------------------------------------------------------
　　fmOpenRead 0 以只讀屬性打開
　　fmOpenWrite 1 以只寫屬性打開
　　fmOpenReadWrite 2 以讀/寫屬性打開
　　fmShareCompat 0 兼容FCB方式(彙編中有相應的DOS功能調用，感興趣自已查閱相關資料)
　　fmShareExclusive 16 共享方式：以獨佔方式打開，在關閉以前，別人不能訪問
fmShareDenyWrite 32 共享方式：拒絕寫訪問
　　fmShareDenyRead 48 共享方式：拒絕讀訪問
　　fmShareDenyNone 64 共享方式：無限制，允許讀寫
　　例：int i=FileOpen("C://WINDOWS//Win.ini",fmOpenReadWrite|fmShareExclusive);
　　⑵FileClose()
　　原型：extern PACKAGE void __fastcall FileClose(int Handle);
　　功能：關閉打開的句柄。
　　參數：Handle:要關閉的句柄---www.bianceng.cn
　　例：FileClose(i);
　　⑶FileRead()
　　原型：extern PACKAGE int __fastcall FileRead(int Handle, void *Buffer, int Count);
　　功能：讀文件，返回實際讀取的字節數，句柄必須首先由FileOpen或FileCreate創建。
　　參數：Handle:要讀取的句柄；Buffer:存放讀取的數據的緩衝區；Count:想讀取的字節數
　　例：char str[400];FileRead(hnd1,str,400);
　　⑷FileSeek()
　　原型：extern PACKAGE int __fastcall FileSeek(int Handle, int Offset, int Origin);
　　功能：移動文件讀取指針，成功返回文件指針的位置，失敗返回-1
　　參數：Handle:相關聯的句柄；Offset:移動的量；Orgin:移動的基準，0=文件頭，1=當前位置，2=文件尾。
　　例：ShowMessage(FileSeek(hnd1,0,2));//取得文件的長度
　　⑸FileWrite()
　　原型：extern PACKAGE int __fastcall FileWrite(int Handle, const void *Buffer, int Count);
　　功能：寫文件，返回實際寫入的字節數，句柄必須首先由FileOpen或FileCreate創建。
　　參數：Handle:要寫入的句柄；Buffer:存放寫入數據的緩衝區；Count:想寫入的字節數
　　例：char str[]="I Love You";FileWrite(hnd1,str,strlen(str));
　　⑹FileCreate()
　　原型：extern PACKAGE int __fastcall FileCreate(const AnsiString FileName);
　　功能：創建文件。成功返回其句柄，否則返回-1
　　參數：FileName:要創建的文件名---www.bianceng.cn
　　例：if(!FileExists("KC.C"))hnd1=FileCreate("KC.C");