在BCB中也提供了文件操作的函数,这些函数的功能和前面所介绍的大致相同,但这类函数和BCB关系紧密,能使用BCB中的AnsiString等数据类型,在BCB中用这种方式的文件操作是最方便的,下面我就把这种文件操作详细介绍。 在BCB提供的这组文件操作函数中,可分为三种类型,就是:1、文件名函数,2、文件管理函数;3、文件I/O函数。 1、文件名函数 函数 说明 下面就把这些函数作一一介绍: ⑴ExpandFileName() 功能:返回文件的全路径(含驱动器、路径) 参数:FileName:要处理的文件名 例:ShowMessage(ExpandFileName(Application->ExeName));//显示你的程序文件名,如C:MyBCBSample1.EXE ⑵ExtractFileExt() 功能:从文件名中抽取扩展名 参数:FileName:要处理的文件名(全路径) 例:ShowMessage(ExtractFileExt(Application->ExeName));//显示".exe" ⑶ExtractFileName() 功能:从文件名中抽取不含路径的文件名 参数:FileName:要处理的文件名 例:ShowMessage(ExtractFileExt("c:/Winnt/SOL.EXE"));//显示"SOL.EXE" ⑷ExtractFilePath() 功能:从文件名中抽取路径名 参数:FileName:要处理的文件名 例:ShowMessage(ExtractFilePath("Winnt/SOL.EXE"));//显示"Winnt" ⑸ExtractFileDir() 功能:从文件名中抽取目录名(和上个函数不同,不包括最后的"") 参数:FileName:要处理的文件名 例:ShowMessage(ExtractFileDir("Winnt/SOL.EXE"));//显示"Winnt",注意和上个函数的区别 ⑹ExtractFileDrive() 功能:从文件名中抽取驱动器名 参数:FileName:要处理的文件名 例:ShowMessage(ExtractFileDrive("c:/Winnt/SOL.EXE"));//显示"c:" ⑺ChangeFileExt() 功能:更改文件名的扩展名,不是对真正的文件进行改名,只是对文件名这个字符串进行处理 参数:FileName:要改名的文件名,Extension:新的扩展名 例:ShowMessage(ChangeFileExt("c:/Winnt/SOL.EXE",".OOO"));//显示"c:winntSOL.OOO" ⑻ExpandUNCFileName() 功能:返回含有网络驱动器的文件全路径,格式为:/机器名共享名文件名 参数:FileName:要处理的文件名 例:ShowMessage(ExpandUNCFileName("F:/Winnt/SOL.EXE"));/*如果F:是映射的网络驱动器/NT40WINNT,则显示"/NT40WINNTSOL.EXE"*/ ⑼ExtractRelativePath() 功能:从文件名中抽取相对路径信息,如"..sssss.asd"这种形式 参数:BaseName:基准文件名;DestName:目标文件名 例:ShowMessage(ExtractRelativePath("D:/Source/c/1.123","D:/Source/Asm/dz.asm"));/*显示"..asmdz.asm"*/ ⑽ExtractShortPathName() 功能:把文件名转换为DOS的8、3格式 参数:FileName:要处理的文件名 例:ShowMessage(ExtractShortPathName("E:/Program Files/Dual Wheel Mouse/4dmain.exe"));/*显示"E:Progra~1dualwh~14dmain.exe"*/ ⑾MatchesMask() 功能:检查文件是否与指定的文件名格式匹配 参数:FileName:要处理的文件名;Mask:文件名格式,支持通配符 例:ShowMessage(MatchesMask("Lxf.exe","*.?x?));//显示"true"
2、文件管理函数 函数 功能 下面就把这些函数作一一介绍: ⑴CreateDir() 功能:建立子目录,如果成功返回true,否则返回false 参数:Dir:要建立的子目录的名字 例:Create("ASM");//在当前目录下建立一个名为ASM的子目录 ⑵DeleteFile() 功能:删除文件,如果成功返回true,否则返回false 参数:FileName:要删除的文件名 例:if(OpenDialog1->Execute())DeleteFile(OpenDialog1->FileName); ⑶DirectoryExists() 功能:检测目录是否存在,如果存在返回true,否则返回false 参数:Name:要检测的目录名 例:if(!DirectoryExists("ASM"))CreateDir("ASM");//如果ASM这个目录不存在则创建之 ⑷DiskFree() 功能:检测磁盘剩余空间,返回值以字节为单位,如果指定的磁盘无效,返回-1 参数:Drive:磁盘的代号,0表示当前盘, 1=A,2=B,3=C 以此类推 例:ShowMessage(DiskFree(0));//显示当前盘的剩余空间 ⑸DiskSize() 功能:检测磁盘容量,返回值以字节为单位,如果指定的磁盘无效,返回-1 参数:Drive:磁盘的代号,0表示当前盘, 1=A,2=B,3=C 以此类推 例:ShowMessage(DiskFree(0));//显示当前盘的容量 ⑹FileExists() 功能:检测文件是否存在,如果存在返回true,否则返回false 参数:FileName:要检测的文件名 例:if(FileExists("AAA.ASM"))DeleteFile("AAA.ASM"); ⑺FileGetAttr() 功能:取得文件属性,如果出错返回-1 返回值如下表,如果返回$00000006表示是一个具有隐含和系统属性的文件(4+2) 常量 值 含义 例:if(FileGetAttr("LLL.TXT")&0x2)ShowMessage("这是一个有隐含属性的文件"); 与此对应的有FileSetAttr() ,请自已查阅帮助系统
功能:返回文件的建立时间到1970-1-1日0时的秒数 参数:Handle:用FileOpen()打开的文件句柄。 例: int i=FileOpen("C:/autoexec.bat",fmOpenRead); 与此对应的有FileSetDate(),请自已查阅帮助系统 ⑼GetCurrentDir() 功能:取得当前的目录名 例:ShowMessage(GetCurrentDir()); ⑽RemoveDir() 功能:删除目录,如果成功返回true,否则返回false 参数:Dir:要删除的目录名 例:if(DiectoryExists("ASM"))RemoveDir("ASM"); ⑾SetCurrentDir() 功能:设置当前目录,如果成功返回true,否则返回false 参数:Dir:要切换到的目录名 例:SetCurrentDir("C:/WINDOWS");
3、文件I/O函数 FileOpen() 打开文件 下面就对这些函数作详细介绍。 ⑴FileOpen() 功能:打开文件,如果成功返回其句柄,否则返回-1 参数:FileName:要打开的文件名;Mode:打开的方式,取值如下表,可用"或"("|")运算符连接。 常量 值 说明 ⑵FileClose() 功能:关闭打开的句柄。 参数:Handle:要关闭的句柄 例:FileClose(i); ⑶FileRead() 功能:读文件,返回实际读取的字节数,句柄必须首先由FileOpen或FileCreate创建。 参数:Handle:要读取的句柄;Buffer:存放读取的数据的缓冲区;Count:想读取的字节数 例:char str[400];FileRead(hnd1,str,400); ⑷FileSeek() 功能:移动文件读取指针,成功返回文件指针的位置,失败返回-1 参数:Handle:相关联的句柄;Offset:移动的量;Orgin:移动的基准,0=文件头,1=当前位置,2=文件尾。 例:ShowMessage(FileSeek(hnd1,0,2));//取得文件的长度 ⑸FileWrite() 功能:写文件,返回实际写入的字节数,句柄必须首先由FileOpen或FileCreate创建。 参数:Handle:要写入的句柄;Buffer:存放写入数据的缓冲区;Count:想写入的字节数 例:char str[]="I Love You";FileWrite(hnd1,str,strlen(str)); ⑹FileCreate() 功能:创建文件。成功返回其句柄,否则返回-1 参数:FileName:要创建的文件名 例:if(!FileExists("KC.C"))hnd1=FileCreate("KC.C"); |
BCB中的文件操作[转]
最新推荐文章于 2017-06-01 18:21:11 发布
BCB中的文件操作
2008年01月21日 13:20