① 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); //将压缩后的文件改成原文件名