一、程序设计原理
我们知道文件之所以能够被分割是因为所有文件都是以二进制的形式存储的,然后再根据文件系统的相应规定来进行读取处理。我们基于这个原理,把所有类型的文件都以二进制进行读写,合并时再以二进制的格式把分割后的文件重新重新组合起来,这样就实现了对文件的分割与合并。
二、程序设计过程及祥解
1.我们先在c++ builder 中新建一个工程,存盘并命名工程文件为fgj.bpr,命名单元文件为filefgj.h。
2.在该工程中分别加入DriveComboBox、DirectoryListBox、FilterComboBox、FileListBox1(以上几个控件位于win3.1组件框中)再添加一个ComboBox组合框、添加三个EDIT组件、添加一个ListBox1列表框、添加5个位图按钮组件BitBtn、添加一个进度条ProgressBar1、添加三个文字标签Label。
打开filefgj.h 头文件,在 private: // User declarations后面添加如下变量
int FileHandle; // 文件名柄变量
int FileLength; file://源文件大小变量
int num; file://源文件被分割后的文件数目
int iBytesRead; file://
char *pszBuffer;//
int buf; // 文件缓冲区变量
int buf1;//文件缓冲区变量
双击FileListBox组件编写该组件的响应事件如下:
void __fastcall TForm1::FileListBox1Change(TObject *Sender)
{
Edit1->Text=FileListBox1->FileName;
Edit3->Text=FileListBox1->FileName+\'0\';
buf=((ComboBox1->Text).ToInt());
buf1=buf*1024l;
FileHandle=FileOpen(Edit1->Text, fmOpenRead);
FileLength=FileSeek(FileHandle,0,2);
num=FileLength/buf1+1;
Edit4->Text=\"分割成\"+IntToStr(num)+\"个文件\";
FileClose(FileHandle);
ListBox1->Items->Clear();
for (int i=1;i<=num;i++)
{
ListBox1->Items->Add(ChangeFileExt(Edit3->Text,\".\"+IntToStr(i)));
}
}
file://-------------------------------------------------------------
双击ComboBox1组件编写如下响应代码:(并把OnChange、OnEnter的响应代码也设为该段代码)
void __fastcall TForm1::ComboBox1Click(TObject *Sender)
{
buf=(ComboBox1->Text.ToInt());
buf1=buf*1024l;
num=FileLength/(buf*1024L)+1;
Edit4->Text=num;
ListBox1->Items->Clear();
for (int i=0;i
ListBox1->Items->Add(ChangeFileExt(Edit3->Text,\".\"+IntToStr(i)));
}
}
file://---------------------------------
双击切割按钮编写切割按钮的响应函数如下:
void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
if (FileLength<=buf1) file://判断欲分割的文件是否小于要分割的字节大小
{ShowMessage(\"文件小于要分割的大小,不用分割\");
return;}
ProgressBar1->Max=num;//初始化进度条
ProgressBar1->Position=1;
int i=1;
pszBuffer = new char [buf1]; file://设置读写文件缓冲区
int temp=buf1;
for (i=1;i<=num;i++)
{
if (i==num) pszBuffer = new char [FileLength-buf1*(num-1)];
if (i==num) temp=FileLength-buf1*(num-1);
FileHandle=FileOpen(Edit1->Text,fmOpenRead); file://打开文件名柄
FileSeek(FileHandle,buf1*(i-1),0);
if (FileRead(FileHandle, pszBuffer,temp)!=temp) ShowMessage(\"Read error!\");
FileClose(FileHandle);
ProgressBar1->Position=i;
Label5->Caption=\"已进行:\"+AnsiString(ProgressBar1->Position*100/num)+\"\";
int Handle=FileCreate((ChangeFileExt(Edit3->Text,\".\"+IntToStr(i))));
if (FileWrite(Handle,pszBuffer,temp)!=temp) ShowMessage(\"Write error!\");
FileClose(Handle);
}
ProgressBar1->Position=1;
Label5->Caption=\"完成分割\";
file://------------------------------------ 生成合并文件时的自动批处理文件代码
AnsiString name=\"/b\";
for (int i=num;i>=1;i--)
{
AnsiString nn=ChangeFileExt(Edit3->Text,\".\"+IntToStr(i));
if (ExtractFileName(FileListBox1->FileName).Length()>12)
{nn=ExtractShortPathName(FileListBox1->FileName);
nn=ChangeFileExt(nn,\".\"+IntToStr(i));
}
if (i==1)
{name=ExtractFileName(nn)+name;}
else
{
name=\"/b+\"+ExtractFileName(nn)+name;}
}
AnsiString hbbat=\"copy \"+name+\" \"+ExtractFileName(FileListBox1->FileName);
fstream file;
file.open(ChangeFileExt(Edit3->Text,\".bat\").c_str());
file<
}
双击\"关于程序\"位图按钮编写\"关于程序\"的响应代码如下:
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
ShellAbout(Handle,\"\",\"\\n明臣文件切割机(V1.00) 版权所有(C)马明臣\\n地址:黑龙江省五大连池市统计局 2002.6\\n联系电话:6322348 Email:[email protected]\",NULL); file://利用api函数显示版板信息
}
双击\"退出程序\"位图按钮编写\"退出程序\"的响应代码如下:
void __fastcall TForm1::BitBtn3Click(TObject *Sender)
{
Close();
}