① VC 中如何使用 BCB 編譯的庫文件
在 Visual C++ 或者 Visual Studio 中, 是無法直接使用 BCB 工程編譯產生的庫文件的. 究其原因, 是由於微軟 Visual C++ lib 文件格式與 BCB 工程的 lib 文件格式不同所導致. Lib 文件中存放的是動態鏈接庫的介面信息, 而不會含有任何函數的內部實現細節. 因此, 我們可以直接通過 Dll 文件來反向生成特定格式的 lib 文件, 以便在 VC 和 BCB 中交叉使用各個編譯的動態鏈接庫.
以 MTK 平台的多路下載工具 SP_MDT 為例, 演示在 VC++ 中直接使用 BCB 編譯的 lib 庫的問題及解決方案. 我們以 Eboot 為例, 源代碼目錄下關於 Eboot 的文件有以下幾個:
Eboot 頭文件定義, 路徑: SP_MDT_SRCEboot
Eboot lib 庫文件, 路徑: SP_MDT_SRCLib
Eboot 動態鏈接庫文件, 路徑: SP_MDT_SRCoutput
我們新建一個 VC++ MFC 工程, 將上述文件全部拷貝到 MFC 工程目錄下, 同時在對話框中實現如下代碼段:
#include "interface.h"ANDROID_DL_HANDLE_T handle;
Android_DL_Create(&handle);
此時, 編譯工程會報出如下錯誤:
error LNK2019: 無法解析的外部符號 _Android_DL_Create@4
該符號在函數 "public: void __thiscall CLibDemoDlg::OnBnClickedOk(void)" 中被引用
原因在於我們僅僅包含了相應函數的頭文件, 而並沒有導入任何的函數實現(如 cpp 源文件或者 lib 庫文件). 接下來, 我們嘗試直接在 VC++ 中使用 BCB 編譯生成的 lib 庫文件, 加入以下代碼:
#pragma comment(lib, "eboot.lib")
編譯時報出如下錯誤:
eboot.lib : warning LNK4003: 無效的庫格式; 已忽略庫
顯然, VC++ 並不能正確的識別 BCB 所生成的 lib 庫文件. 那麼如何解決這個問題呢? 一般來說有兩種方法:
動態載入 dll 動態鏈接庫
最直接的方法是, 既然有頭文件, 那麼就可以知道各個函數的定義, 而 dll 動態鏈接庫則會將這些公開的函數導出. 因此, 可以直接調用 LoadLibrary 載入動態鏈接庫, 並查找到相應的函數地址, 完成調用. 這種方法簡單粗暴, 其好處是寫出的源代碼無論是在 BCB 還是在 VC++ 平台都能夠通用. 但其缺點也很明顯, 需要改寫頭文件, 定義各種各樣的函數指針, 如果使用到的導出函數很多, 則工作量較大.
② 文件操作
dec 格式化為十進制數值數據 輸入和輸出
endl 輸出一個換行符並刷新此流 輸出
ends 輸出一個空字元 輸出
hex 格式化為十六進制數值數據 輸入和輸出
oct 格式化為八進制數值數據 輸入和輸出
setpxecision(int p) 設置浮點數的精度位數 輸出
比如要把123當作十六進制輸出：file1<
2. 二進制文件的讀寫
①put()
put()函數向流寫入一個字元，其原型是ofstream &put(char ch)，使用也比較簡單，如file1.put('c');就是向流寫一個字元'c'。
②get()
get()函數比較靈活，有3種常用的重載形式：
一種就是和put()對應的形式：ifstream &get(char &ch);功能是從流中讀取一個字元，結果保存在引用ch中，如果到文件尾，返回空字元。如file2.get(x);表示從文件中讀取一個字元，並把讀取的字元保存在x中。
另一種重載形式的原型是： int get();這種形式是從流中返回一個字元，如果到達文件尾，返回EOF，如x=file2.get();和上例功能是一樣的。
還有一種形式的原型是：ifstream &get(char *buf,int num,char delim='\n');這種形式把字元讀入由 buf 指向的數組，直到讀入了 num 個字元或遇到了由 delim 指定的字元，如果沒使用 delim 這個參數，將使用預設值換行符'\n'。例如：
file2.get(str1,127,'A');//從文件中讀取字元到字元串str1，當遇到字元'A'或讀取了127個字元時終止。
③讀寫數據塊
要讀寫二進制數據塊，使用成員函數read()和write()成員函數，它們原型如下：
read(unsigned char *buf,int num);
write(const unsigned char *buf,int num);
read()從文件中讀取 num 個字元到 buf 指向的緩存中，如果在還未讀入 num 個字元時就到了文件尾，可以用成員函數 int gcount();來取得實際讀取的字元數;而 write() 從buf 指向的緩存寫 num 個字元到文件中，值得注意的是緩存的類型是 unsigned char *，有時可能需要類型轉換。
例：
以下是引用片段：
unsigned char str1[]="I Love You";
int n[5];
ifstream in("xxx.xxx");
ofstream out("yyy.yyy");
out.write(str1,strlen(str1));//把字元串str1全部寫到yyy.yyy中
in.read((unsigned char*)n,sizeof(n));//從xxx.xxx中讀取指定個整數，注意類型轉換
in.close();out.close();
4. 檢測EOF
成員函數eof()用來檢測是否到達文件尾，如果到達文件尾返回非0值，否則返回0。原型是int eof();
例： if(in.eof())ShowMessage("已經到達文件尾!");
5. 文件定位
和C的文件操作方式不同的是，C++ I/O系統管理兩個與一個文件相聯系的指針。一個是讀指針，它說明輸入操作在文件中的位置;另一個是寫指針，它下次寫操作的位置。每次執行輸入或輸出時，相應的指針自動變化。所以，C++的文件定位分為讀位置和寫位置的定位，對應的成員函數是 seekg()和 seekp()，seekg()是設置讀位置，seekp是設置寫位置。它們最通用的形式如下：
istream &seekg(streamoff offset,seek_dir origin);
ostream &seekp(streamoff offset,seek_dir origin);
streamoff定義於 iostream.h 中，定義有偏移量 offset 所能取得的最大值，seek_dir 表示移動的基準位置，是一個有以下值的枚舉：
ios::beg： 文件開頭
ios::cur： 文件當前位置
ios::end： 文件結尾
這兩個函數一般用於二進制文件，因為文本文件會因為系統對字元的解釋而可能與預想的值不同。
例：
file1.seekg(1234,ios::cur);//把文件的讀指針從當前位置向後移1234個位元組
file2.seekp(1234,ios::beg);//把文件的寫指針從文件開頭向後移1234個位元組
有了這些知識，我們就可以完成對文件的操作了，當然，還有好多的成員函數我沒介紹，但有這些我們已經能完成大多數的需要了，這種文件操作方式是我比較喜歡的一種方法，比C的方法靈活，又比BCB函數和WINAPI函數具有通用性。
下一次，我將介紹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);
功能：從文件名中抽取路徑名
參數：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\alwh~1\4dmain.exe"*/
⑾MatchesMask()
原型：extern PACKAGE bool __fastcall MatchesMask(const AnsiString Filename, const AnsiString Mask);
功能：檢查文件是否與指定的文件名格式匹配
參數：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:要關閉的句柄
例：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:要創建的文件名
例：if(!FileExists("KC.C"))hnd1=FileCreate("KC.C");
③ 在BCB中怎樣執行Access的資料庫壓縮與修復
#include "objbase.h" //牽涉到COM對象，必須包含此頭文件
AnsiString srcmdb="c:\\test.mdb"; //原文件名(壓縮之前)
AnsiString destmdb="c:\\test2.mdb"; //目標文件名(壓縮之後)
CoInitialize(NULL); //初始化COM對象
AnsiString src = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+srcmdb; //連接字串
AnsiString dest = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+destmdb;
Variant AdoObj = Variant::CreateObject("JRO.JetEngine");
AdoObj.OleProcere("CompactDatabase",src.c_str(),dest.c_str());
AdoObj.Clear();
CoUninitialize();
DeleteFile(srcmdb) ; //刪除原文件，如果不放心可以不刪除留個備份，但需要改名
RenameFile(destmdb,srcmdb); //將壓縮後的文件改成原文件名